1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-14 16:50:58 +00:00

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

This commit is contained in:
Eli Zaretskii 2006-03-03 11:49:22 +00:00
parent 019ed9c702
commit ee65a1327b

View File

@ -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,