Mercurial > emacs
changeset 4061:7279958409fe
(ispell-menu-map): New autoload definition.
(menu-bar-edit-menu): Add "Spell" item.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Mon, 12 Jul 1993 20:29:28 +0000 |
| parents | 7b4f3b64253b |
| children | d7f5f18ddbc5 |
| files | lisp/menu-bar.el |
| diffstat | 1 files changed, 4 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/menu-bar.el Sat Jul 10 05:18:56 1993 +0000 +++ b/lisp/menu-bar.el Mon Jul 12 20:29:28 1993 +0000 @@ -45,6 +45,8 @@ (define-key menu-bar-file-menu [open-file] '("Open File..." . find-file)) (define-key menu-bar-file-menu [new-frame] '("New Frame" . new-frame)) + +(define-key menu-bar-edit-menu [spell] '("Spell..." . ispell-menu-map)) (define-key menu-bar-edit-menu [fill] '("Fill" . fill-region)) (define-key menu-bar-edit-menu [clear] '("Clear" . delete-region)) (define-key menu-bar-edit-menu [choose-next-paste] @@ -63,6 +65,8 @@ pending-undo-list (consp buffer-undo-list))) +(autoload 'ispell-menu-map "ispell" nil t 'keymap) + (define-key menu-bar-help-menu [emacs-tutorial] '("Emacs Tutorial" . help-with-tutorial)) (define-key menu-bar-help-menu [man] '("Man..." . manual-entry))