Mercurial > emacs
diff lisp/textmodes/flyspell.el @ 69379:385f9e668650
(flyspell-external-point-words, flyspell-process-localwords): Fix last changes.
author | Eli Zaretskii <eliz@gnu.org> |
---|---|
date | Sat, 11 Mar 2006 15:06:44 +0000 |
parents | 396834ac06ac |
children | 1b4ea61692ff a802c5505156 |
line wrap: on
line diff
--- a/lisp/textmodes/flyspell.el Sat Mar 11 15:02:34 2006 +0000 +++ b/lisp/textmodes/flyspell.el Sat Mar 11 15:06:44 2006 +0000 @@ -1323,7 +1323,7 @@ (let (words-not-found (ispell-otherchars (ispell-get-otherchars)) (buffer-scan-pos flyspell-large-region-beg) - (case-fold-search nil)) + case-fold-search) (with-current-buffer flyspell-external-ispell-buffer (goto-char (point-min)) ;; Loop over incorrect words, in the order they were reported, @@ -1409,8 +1409,7 @@ ;;* declared correct. */ ;;*---------------------------------------------------------------------*/ (defun flyspell-process-localwords (misspellings-buffer) - (let (localwords - (case-fold-search nil) + (let (localwords case-fold-search (ispell-casechars (ispell-get-casechars))) ;; Get localwords from the original buffer (save-excursion