From 81b328e5d1bb14f1ab603ef4fb7ce88955b3dd51 Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Sat, 17 Sep 1994 00:28:47 +0000 Subject: [PATCH] (ispell-menu-map): Order menu items by size: buffer > region > word. --- lisp/textmodes/ispell.el | 4 ++-- lisp/textmodes/ispell4.el | 6 +++--- 2 files changed, 5 insertions(+), 5 deletions(-) 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. -- 2.39.5