From b57148527d873fa29ea124edce559cc73c12c238 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Wed, 2 Nov 2005 01:34:04 +0000 Subject: [PATCH] (flyspell-external-point-words): Pass nil to flyspell-get-word. --- lisp/ChangeLog | 5 +++++ lisp/textmodes/flyspell.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 4f0c3cc6e91..c53fb3cf44f 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2005-11-01 Richard M. Stallman + + * textmodes/flyspell.el (flyspell-external-point-words): + Pass nil to flyspell-get-word. + 2005-11-02 Kim F. Storm * menu-bar.el (menu-bar-options-menu): Show "Shift Movement (CUA)" diff --git a/lisp/textmodes/flyspell.el b/lisp/textmodes/flyspell.el index 253485fc87f..f65ffd0ba5c 100644 --- a/lisp/textmodes/flyspell.el +++ b/lisp/textmodes/flyspell.el @@ -1360,7 +1360,7 @@ The buffer to mark them in is `flyspell-large-region-buffer'." ;; Detect when WORD can't be checked properly ;; because flyspell-get-word finds ;; just part of it, and treat that as ok. - (if (< (length (flyspell-get-word following)) + (if (< (length (flyspell-get-word nil)) (length word)) nil (flyspell-word)))) -- 2.39.5