# HG changeset patch # User Eli Zaretskii # Date 1148673676 0 # Node ID 3ffa2f66a3037d4261e0eb5db50965253def925d # Parent 190fd757114b395cbec44d743522a76472c2f677 (menu-bar-apropos-menu): Move "Find Key in Manual" and "Find Command in Manual" to here. diff -r 190fd757114b -r 3ffa2f66a303 lisp/menu-bar.el --- 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