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

diff --git a/lisp/textmodes/flyspell.el b/lisp/textmodes/flyspell.el
index 16c50397824948a4a72fc94f1637764844e5cd59..35bf8d46100119f024eb8f21a88fea616f88469a 100644 (file)
--- 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,