Mercurial > emacs
changeset 17615:32f90c43d1d2
(menu-bar-custom-menu):
New item `Browse All Customization'.
Rename and shuffle other items.
`Specify Group...' is now customize-group.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Thu, 01 May 1997 22:21:19 +0000 |
parents | da246ef7532c |
children | a64126a1f870 |
files | lisp/menu-bar.el |
diffstat | 1 files changed, 8 insertions(+), 6 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/menu-bar.el Thu May 01 21:35:31 1997 +0000 +++ b/lisp/menu-bar.el Thu May 01 22:21:19 1997 +0000 @@ -321,16 +321,18 @@ (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))