(menu-bar-apropos-menu): Move "Find Key in Manual" and "Find Command in Manual"
authorEli Zaretskii <eliz@gnu.org>
Fri, 26 May 2006 20:01:16 +0000 (20:01 +0000)
committerEli Zaretskii <eliz@gnu.org>
Fri, 26 May 2006 20:01:16 +0000 (20:01 +0000)
to here.

lisp/menu-bar.el

index 5393923..cc1351b 100644 (file)
@@ -1302,6 +1302,12 @@ key, a click, or a menu-item"))
              :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 @@ key, a click, or a menu-item"))
 (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