diff options
| author | Richard M. Stallman <rms@gnu.org> | 2004-11-04 10:20:35 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 2004-11-04 10:20:35 +0000 |
| commit | 5a2045cea776b8dc66111d01740601aa9b3b692c (patch) | |
| tree | 728c193123b065726235411669dd64a12f73e989 | |
| parent | 5e6c7c3c8d44bc2545db281cce97a6aa07387d15 (diff) | |
| download | emacs-5a2045cea776b8dc66111d01740601aa9b3b692c.tar.gz emacs-5a2045cea776b8dc66111d01740601aa9b3b692c.tar.bz2 emacs-5a2045cea776b8dc66111d01740601aa9b3b692c.zip | |
(flyspell-word): Don't alter FOLLOWING; set it only thru `interactive' spec.
| -rw-r--r-- | lisp/textmodes/flyspell.el | 4 |
1 files changed, 1 insertions, 3 deletions
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) |