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

1 files changed, 2 insertions, 1 deletions

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,