| ![Date Prev [Date Prev]](style/prev.png)  ![Date Index [Date Index]](style/up.png)  ![Date Next [Date Next]](style/next.png)  | ![Thread Prev [Thread Prev]](style/prev.png)  ![Thread Index [Thread Index]](style/up.png)  ![Thread Next [Thread Next]](style/next.png)  | 
> そのタイミングでは、まだメニューがありません。
そうでしたか。
> (add-hook '*post-startup-hook*
>           #'(lambda ()
>       (let ((help (get-menu *app-menu* 'ed::help)))
> (insert-menu-item help 2 'undoundo "あんどぅー" 'undo))))
上記の方法でうまくいきました。何度もお返事いただきありがとうございました。>
亀井さん&Toyさん
#今後ともよろしくお願いします。
    kazu.y