(menu-bar-edit-menu): Capitalize an item name.

(menu-bar-tools-menu): Add verb to Calendar item.
(menu-bar-help-menu): Rename Info to Browse Manuals.

diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el
index a7e0fbc596710b06bd04e88bc7cd8a6eb9b95d7b..01c65a07c67af33cf9d0ba468e3c9d084233cc25 100644 (file)
--- a/lisp/menu-bar.el
+++ b/lisp/menu-bar.el
@@ -44,7 +44,7 @@
 \f
 (defvar vc-menu-map (make-sparse-keymap "Version Control"))
 
-(define-key menu-bar-tools-menu [calendar] '("Calendar" . calendar))
+(define-key menu-bar-tools-menu [calendar] '("Display Calendar" . calendar))
 (define-key menu-bar-tools-menu [rmail] '("Read Mail" . rmail))
 (define-key menu-bar-tools-menu [gnus] '("Read Net News" . gnus))
 
@@ -212,7 +212,7 @@
 
 (define-key menu-bar-edit-menu [clear] '("Clear" . delete-region))
 
-(define-key menu-bar-edit-menu [paste] '("Paste most recent" . yank))
+(define-key menu-bar-edit-menu [paste] '("Paste Most Recent" . yank))
 
 (defvar yank-menu (cons "Select Yank" nil))
 (fset 'yank-menu (cons 'keymap yank-menu))
@@ -307,7 +307,7 @@ Do the same for the keys of the same name."
   '("Command Apropos..." . command-apropos))
 (define-key menu-bar-help-menu [describe-mode]
   '("Describe Mode" . describe-mode))
-(define-key menu-bar-help-menu [info] '("Info" . info))
+(define-key menu-bar-help-menu [info] '("Browse Manuals" . info))
 (define-key menu-bar-help-menu [emacs-faq] '("Emacs FAQ" . view-emacs-FAQ))
 (define-key menu-bar-help-menu [emacs-news] '("Emacs News" . view-emacs-news))