From ddf70bd8ddb030f37e94016b235f8dd36cbd6dac Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Thu, 15 Jul 1993 05:40:01 +0000 Subject: [PATCH] (help-menu-bar-map): Put the Help item in this map. --- lisp/menu-bar.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el index e8f1f00e7f..a8f72fcd9a 100644 --- a/lisp/menu-bar.el +++ b/lisp/menu-bar.el @@ -25,7 +25,9 @@ (define-key global-map [menu-bar] (make-sparse-keymap "menu-bar")) (defvar menu-bar-help-menu (make-sparse-keymap "Help")) -(define-key global-map [menu-bar help] (cons "Help" menu-bar-help-menu)) +;; Put Help item in help-menu-bar-map so it always goes last. +(setq help-menu-bar-map (make-sparse-keymap)) +(define-key help-menu-bar-map [help] (cons "Help" menu-bar-help-menu)) (defvar menu-bar-edit-menu (make-sparse-keymap "Edit")) (define-key global-map [menu-bar edit] (cons "Edit" menu-bar-edit-menu)) (defvar menu-bar-file-menu (make-sparse-keymap "File")) -- 2.20.1