changeset 8822:33a3f424c8c3

(ispell-menu-map): Order menu items by size: buffer > region > word.
author Karl Heuer <kwzh@gnu.org>
date Sat, 17 Sep 1994 00:28:47 +0000
parents 041e02e09745
children fdb7ba55f05c
files lisp/textmodes/=ispell4.el lisp/textmodes/ispell.el
diffstat 2 files changed, 5 insertions(+), 5 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/textmodes/=ispell4.el	Sat Sep 17 00:28:39 1994 +0000
+++ b/lisp/textmodes/=ispell4.el	Sat Sep 17 00:28:47 1994 +0000
@@ -234,15 +234,15 @@
 (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.
--- a/lisp/textmodes/ispell.el	Sat Sep 17 00:28:39 1994 +0000
+++ b/lisp/textmodes/ispell.el	Sat Sep 17 00:28:47 1994 +0000
@@ -530,10 +530,10 @@
     (progn
       (define-key ispell-menu-map [ispell-continue]
 	'("Continue Check" . ispell-continue))
+      (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-word]
-	'("Check Word" . ispell-word))
       (define-key ispell-menu-map [ispell-buffer]
 	'("Check Buffer" . ispell-buffer))))