メニューはほとんど使わないので消す。
まったく消してしまうと不安なので、右クリックしたときのコンテキストメニューでメインメニューを出せるようにしとく。
;;; toggle-menu でメインメニュー表示を切り替え (defvar *main-menu* *app-menu*) (defun toggle-main-menu () (interactive) (set-menu (setq *main-menu* (if *main-menu* nil *app-menu*)))) ;;; デフォでメニューを消しておく (add-hook '*post-startup-hook* #'(lambda () (set-menu (setq *main-menu* nil)))) ;;; コンテキストメニューをすげ替える (setq *my-menu* (define-popup-menu (:item nil "メインメニューを表示(&M)" 'toggle-main-menu))) (add-hook '*init-app-menus-hook* #'(lambda () (setq *app-popup-menu* *my-menu*)))
上のを .xyzzy に書いておく。