From: Karl Heuer <kwzh@gnu.org>
Date: Sat, 17 Sep 1994 00:28:47 +0000 (+0000)
Subject: (ispell-menu-map): Order menu items by size: buffer > region > word.
X-Git-Tag: emacs-19.34~7032
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=81b328e5d1bb14f1ab603ef4fb7ce88955b3dd51;p=emacs.git

(ispell-menu-map): Order menu items by size: buffer > region > word.
---

diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el
index 2325998529c..c1bf5e52709 100644
--- a/lisp/textmodes/ispell.el
+++ b/lisp/textmodes/ispell.el
@@ -530,10 +530,10 @@ language.aff file \(e.g., english.aff\).")
     (progn
       (define-key ispell-menu-map [ispell-continue]
 	'("Continue Check" . ispell-continue))
-      (define-key ispell-menu-map [ispell-region]
-	'("Check Region" . ispell-region))
       (define-key ispell-menu-map [ispell-word]
 	'("Check Word" . ispell-word))
+      (define-key ispell-menu-map [ispell-region]
+	'("Check Region" . ispell-region))
       (define-key ispell-menu-map [ispell-buffer]
 	'("Check Buffer" . ispell-buffer))))
 
diff --git a/lisp/textmodes/ispell4.el b/lisp/textmodes/ispell4.el
index b57917909a8..3e87b7c7322 100644
--- a/lisp/textmodes/ispell4.el
+++ b/lisp/textmodes/ispell4.el
@@ -234,15 +234,15 @@ that have not already been dumped will be lost."
 (define-key ispell-menu-map [ispell-message]
   '("Check Message" . ispell-message))
 
+(define-key ispell-menu-map [ispell-word]
+  '("Check Word" . ispell-word))
+
 (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.