From 9e18f0a0a80634a407b4866edea130764228604a Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Mon, 12 Jul 1993 20:29:28 +0000 Subject: [PATCH] (ispell-menu-map): New autoload definition. (menu-bar-edit-menu): Add "Spell" item. --- lisp/menu-bar.el | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el index c4a2ea013b8..0d9749d648b 100644 --- a/lisp/menu-bar.el +++ b/lisp/menu-bar.el @@ -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)) -- 2.39.5