# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 742509112 0
# Node ID d7f5f18ddbc512b8fa66405b9aba5afde345d12d
# Parent  7279958409fe73959bd3e6fcd8edfaf0392f8466
(ispell-menu-map): New keymap--both fn and var.

diff -r 7279958409fe -r d7f5f18ddbc5 lisp/textmodes/=ispell4.el
--- a/lisp/textmodes/=ispell4.el	Mon Jul 12 20:29:28 1993 +0000
+++ b/lisp/textmodes/=ispell4.el	Mon Jul 12 20:31:52 1993 +0000
@@ -213,6 +213,24 @@
 (defun ispell-tex-buffer-p ()
   (memq major-mode '(plain-TeX-mode LaTeX-mode)))
 
+(defvar ispell-menu-map (make-sparse-keymap "Spell"))
+(defalias ispell-menu-map ispell-menu-map)
+
+(define-key ispell-menu-map [reload-ispell]
+  '("Reload Dictionary" . reload-ispell))
+
+(define-key ispell-menu-map [ispell-next]
+  '("Continue Check" . ispell-next))
+
+(define-key ispell-menu-map [ispell-region]
+  '("Check Region" . ispell-region))
+
+(define-key ispell-menu-map [ispell-buffer]
+  '("Check Buffer" . ispell))
+
+(define-key ispell-menu-map [ispell-word]
+  '("Check Word" . ispell-word))
+
 ;;;###autoload
 (defun ispell (&optional buf start end)
   "Run Ispell over current buffer's visited file.