From: Richard M. Stallman Date: Thu, 1 May 1997 22:21:19 +0000 (+0000) Subject: (menu-bar-custom-menu): X-Git-Tag: emacs-20.1~2330 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c9a86e717aa54571bb2c0cab53d87a61092a5c1c;p=emacs.git (menu-bar-custom-menu): New item `Browse All Customization'. Rename and shuffle other items. `Specify Group...' is now customize-group. --- diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el index 4ca22d62522..7a13cb6936d 100644 --- a/lisp/menu-bar.el +++ b/lisp/menu-bar.el @@ -321,16 +321,18 @@ Do the same for the keys of the same name." (defvar menu-bar-custom-menu (make-sparse-keymap "Customize")) +(define-key menu-bar-custom-menu [custom-menu-update] + '("Update This Menu" . custom-menu-update)) (define-key menu-bar-custom-menu [customize-apropos] '("Apropos..." . customize-apropos)) -(define-key menu-bar-custom-menu [customize-variable] - '("Variable..." . customize-variable)) +(define-key menu-bar-custom-menu [customize-group] + '("Specific Group..." . customize-group)) (define-key menu-bar-custom-menu [customize-face] - '("Face..." . customize-face)) + '("Specific Face..." . customize-face)) +(define-key menu-bar-custom-menu [customize-variable] + '("Specific Variable..." . customize-variable)) (define-key menu-bar-custom-menu [customize] - '("Group..." . customize)) -(define-key menu-bar-custom-menu [custom-menu-update] - '("Update menu..." . custom-menu-update)) + '("Browse Hierarchy of User Options" . customize)) (define-key menu-bar-help-menu [customize-menu] (cons "Customize" menu-bar-custom-menu))