Mercurial > emacs
comparison lisp/textmodes/flyspell.el @ 80737:60803f3caac0
(flyspell-word): Revert last change.
author | Chong Yidong <cyd@stupidchicken.com> |
---|---|
date | Sat, 16 Aug 2008 16:52:10 +0000 |
parents | 3843bed9cf0e |
children |
comparison
equal
deleted
inserted
replaced
80736:17070f2de6f3 | 80737:60803f3caac0 |
---|---|
1002 ;;* flyspell-word ... */ | 1002 ;;* flyspell-word ... */ |
1003 ;;*---------------------------------------------------------------------*/ | 1003 ;;*---------------------------------------------------------------------*/ |
1004 (defun flyspell-word (&optional following) | 1004 (defun flyspell-word (&optional following) |
1005 "Spell check a word." | 1005 "Spell check a word." |
1006 (interactive (list ispell-following-word)) | 1006 (interactive (list ispell-following-word)) |
1007 (ispell-maybe-find-aspell-dictionaries) | |
1008 (save-excursion | 1007 (save-excursion |
1009 ;; use the correct dictionary | 1008 ;; use the correct dictionary |
1010 (flyspell-accept-buffer-local-defs) | 1009 (flyspell-accept-buffer-local-defs) |
1011 (let* ((cursor-location (point)) | 1010 (let* ((cursor-location (point)) |
1012 (flyspell-word (flyspell-get-word following)) | 1011 (flyspell-word (flyspell-get-word following)) |