From: Eli Zaretskii <eliz@gnu.org>
Date: Fri, 3 Mar 2006 11:49:22 +0000 (+0000)
Subject: (flyspell-external-point-words): Be case-sensitive.
X-Git-Tag: emacs-pretest-22.0.90~3808
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ee65a1327b4bcca71e79a4de0505b4169d8b06dd;p=emacs.git

(flyspell-external-point-words): Be case-sensitive.
---

diff --git a/lisp/textmodes/flyspell.el b/lisp/textmodes/flyspell.el
index 16c50397824..35bf8d46100 100644
--- a/lisp/textmodes/flyspell.el
+++ b/lisp/textmodes/flyspell.el
@@ -1322,7 +1322,8 @@ The list of incorrect words should be in `flyspell-external-ispell-buffer'.
 The buffer to mark them in is `flyspell-large-region-buffer'."
   (let (words-not-found
 	(ispell-otherchars (ispell-get-otherchars))
-	(buffer-scan-pos flyspell-large-region-beg))
+	(buffer-scan-pos flyspell-large-region-beg)
+	(case-fold-search nil))
     (with-current-buffer flyspell-external-ispell-buffer
       (goto-char (point-min))
       ;; Loop over incorrect words, in the order they were reported,