changeset 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 45fbf2b25e1a
children 60a755271982
files lisp/textmodes/flyspell.el
diffstat 1 files changed, 2 insertions(+), 3 deletions(-) [+]
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