xyzzyの使い方が分からぬやし励ましあえその11

xyzzyの使い方が分か� ..

337:332
08/02/12 06:59:15 SUwXSJwZ0
途中ミスってました。気づいたら、xyzzyのメニューがなくなっててびっくりした
何度も吸いません

> (defun encoding-menu-in-file-autoload ()
> 　(let ((filemenu (get-menu *app-menu* 'ed::file)))
> 　　(insert-popup-menu filemenu
> 　　　　　　　　　　　 (1- (get-menu-position (get-menu *app-menu* 'ed::file) :above-session))
> 　　　　　　　　　　　 (encoding-menu '*encoding-menu* 'revert-buffer)
> 　　　　　　　　　　　 "Reopen with Encoding (&G)\tC-c e")))

(defun encoding-menu-in-file-autoload ()
　(let ((filemenu (get-menu *app-menu* 'ed::file)))
　　(insert-popup-menu filemenu
　　　　　　　　　　　 (1- (get-menu-position (get-menu *app-menu* 'ed::file) :above-session))
　　　　　　　　　　　 (encoding-menu *encoding-menu* 'revert-buffer)
　　　　　　　　　　　 "Reopen with Encoding (&G)\tC-c e")))

次ページ

続きを表示

1を表示