diff options
| author | Richard M. Stallman | 1995-04-02 05:46:12 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1995-04-02 05:46:12 +0000 |
| commit | e17267228e4ca361823e962227f1e7b36749ca9c (patch) | |
| tree | febd3928f0bc4abae96a384f0bb8c1fd2147623b | |
| parent | fa8afe42175686e84905dbed30ff7a9518512ee4 (diff) | |
| download | emacs-e17267228e4ca361823e962227f1e7b36749ca9c.tar.gz emacs-e17267228e4ca361823e962227f1e7b36749ca9c.zip | |
(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.
| -rw-r--r-- | lisp/menu-bar.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el index a7e0fbc5967..01c65a07c67 100644 --- a/lisp/menu-bar.el +++ b/lisp/menu-bar.el | |||
| @@ -44,7 +44,7 @@ | |||
| 44 | 44 | ||
| 45 | (defvar vc-menu-map (make-sparse-keymap "Version Control")) | 45 | (defvar vc-menu-map (make-sparse-keymap "Version Control")) |
| 46 | 46 | ||
| 47 | (define-key menu-bar-tools-menu [calendar] '("Calendar" . calendar)) | 47 | (define-key menu-bar-tools-menu [calendar] '("Display Calendar" . calendar)) |
| 48 | (define-key menu-bar-tools-menu [rmail] '("Read Mail" . rmail)) | 48 | (define-key menu-bar-tools-menu [rmail] '("Read Mail" . rmail)) |
| 49 | (define-key menu-bar-tools-menu [gnus] '("Read Net News" . gnus)) | 49 | (define-key menu-bar-tools-menu [gnus] '("Read Net News" . gnus)) |
| 50 | 50 | ||
| @@ -212,7 +212,7 @@ | |||
| 212 | 212 | ||
| 213 | (define-key menu-bar-edit-menu [clear] '("Clear" . delete-region)) | 213 | (define-key menu-bar-edit-menu [clear] '("Clear" . delete-region)) |
| 214 | 214 | ||
| 215 | (define-key menu-bar-edit-menu [paste] '("Paste most recent" . yank)) | 215 | (define-key menu-bar-edit-menu [paste] '("Paste Most Recent" . yank)) |
| 216 | 216 | ||
| 217 | (defvar yank-menu (cons "Select Yank" nil)) | 217 | (defvar yank-menu (cons "Select Yank" nil)) |
| 218 | (fset 'yank-menu (cons 'keymap yank-menu)) | 218 | (fset 'yank-menu (cons 'keymap yank-menu)) |
| @@ -307,7 +307,7 @@ Do the same for the keys of the same name." | |||
| 307 | '("Command Apropos..." . command-apropos)) | 307 | '("Command Apropos..." . command-apropos)) |
| 308 | (define-key menu-bar-help-menu [describe-mode] | 308 | (define-key menu-bar-help-menu [describe-mode] |
| 309 | '("Describe Mode" . describe-mode)) | 309 | '("Describe Mode" . describe-mode)) |
| 310 | (define-key menu-bar-help-menu [info] '("Info" . info)) | 310 | (define-key menu-bar-help-menu [info] '("Browse Manuals" . info)) |
| 311 | (define-key menu-bar-help-menu [emacs-faq] '("Emacs FAQ" . view-emacs-FAQ)) | 311 | (define-key menu-bar-help-menu [emacs-faq] '("Emacs FAQ" . view-emacs-FAQ)) |
| 312 | (define-key menu-bar-help-menu [emacs-news] '("Emacs News" . view-emacs-news)) | 312 | (define-key menu-bar-help-menu [emacs-news] '("Emacs News" . view-emacs-news)) |
| 313 | 313 | ||