From: Richard M. Stallman <rms@gnu.org>
Date: Thu, 4 Nov 2004 10:20:35 +0000 (+0000)
Subject: (flyspell-word): Don't alter FOLLOWING; set it only thru `interactive' spec.
X-Git-Tag: ttn-vms-21-2-B4~4195
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=5a2045cea776b8dc66111d01740601aa9b3b692c;p=emacs.git

(flyspell-word): Don't alter FOLLOWING; set it only thru `interactive' spec.
---

diff --git a/lisp/textmodes/flyspell.el b/lisp/textmodes/flyspell.el
index 93a7ebd52e4..556369077d8 100644
--- a/lisp/textmodes/flyspell.el
+++ b/lisp/textmodes/flyspell.el
@@ -956,9 +956,7 @@ Mostly we check word delimiters."
 ;*---------------------------------------------------------------------*/
 (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)