Mercurial > emacs
changeset 70972:3ffa2f66a303
(menu-bar-apropos-menu): Move "Find Key in Manual" and "Find Command in Manual"
to here.
| author | Eli Zaretskii <eliz@gnu.org> |
|---|---|
| date | Fri, 26 May 2006 20:01:16 +0000 |
| parents | 190fd757114b |
| children | 4477a2e46659 |
| files | lisp/menu-bar.el |
| diffstat | 1 files changed, 6 insertions(+), 8 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/menu-bar.el Fri May 26 19:44:38 2006 +0000 +++ b/lisp/menu-bar.el Fri May 26 20:01:16 2006 +0000 @@ -1302,6 +1302,12 @@ :help "Find commands whose names match a regexp")) (define-key menu-bar-apropos-menu [sep1] '("--")) +(define-key menu-bar-apropos-menu [emacs-command-node] + '(menu-item "Look Up Command in User Manual..." Info-goto-emacs-command-node + :help "Display manual section that describes a command")) +(define-key menu-bar-apropos-menu [emacs-key-command-node] + '(menu-item "Look Up Key in User Manual..." Info-goto-emacs-key-command-node + :help "Display manual section that describes a key")) (define-key menu-bar-apropos-menu [elisp-index-search] '(menu-item "Look Up Subject in ELisp Manual..." elisp-index-search :help "Find description of a subject in Emacs Lisp manual")) @@ -1334,14 +1340,6 @@ (define-key menu-bar-manuals-menu [info-elintro] '(menu-item "Introduction to Emacs Lisp" menu-bar-read-lispintro :help "Read the Introduction to Emacs Lisp Programming")) -(define-key menu-bar-manuals-menu [sep3] - '("--")) -(define-key menu-bar-manuals-menu [command] - '(menu-item "Find Command in Manual..." Info-goto-emacs-command-node - :help "Display manual section that describes a command")) -(define-key menu-bar-manuals-menu [key] - '(menu-item "Find Key in Manual..." Info-goto-emacs-key-command-node - :help "Display manual section that describes a key")) (define-key menu-bar-help-menu [eliza] '(menu-item "Emacs Psychotherapist" doctor