Mercurial > emacs

changeset 57936:10358c7d410b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(flyspell-word): Don't alter FOLLOWING; set it only thru `interactive' spec.
author Richard M. Stallman <rms@gnu.org>
date Thu, 04 Nov 2004 10:20:35 +0000
parents 93315f35a1d4
children d4af4d8d512b
files lisp/textmodes/flyspell.el
diffstat 1 files changed, 1 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/textmodes/flyspell.el	Thu Nov 04 10:16:51 2004 +0000
+++ b/lisp/textmodes/flyspell.el	Thu Nov 04 10:20:35 2004 +0000
@@ -956,9 +956,7 @@
 ;*---------------------------------------------------------------------*/
 (defun flyspell-word (&optional following)
   "Spell check a word."
-  (interactive (list current-prefix-arg))
-  (if (interactive-p)
-      (setq following ispell-following-word))
+  (interactive (list ispell-following-word))
   (save-excursion
     ;; use the correct dictionary
     (flyspell-accept-buffer-local-defs)