changeset 97742:5c765f31d8e0

(flyspell-check-pre-word-p): Make sure flyspell-pre-point is valid to avoid signalling an error in post-command-hook.
author Chong Yidong <cyd@stupidchicken.com>
date Tue, 26 Aug 2008 23:00:31 +0000
parents 1aac7c6d1cd8
children 58b334ba1ec6
files lisp/textmodes/flyspell.el
diffstat 1 files changed, 3 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/textmodes/flyspell.el	Tue Aug 26 23:00:18 2008 +0000
+++ b/lisp/textmodes/flyspell.el	Tue Aug 26 23:00:31 2008 +0000
@@ -744,6 +744,9 @@
 		  (eq flyspell-previous-command this-command)))
 	 (or (= (current-column) 0)
 	     (= (current-column) flyspell-pre-column)
+	     ;; If other post-command-hooks change the buffer,
+	     ;; flyspell-pre-point can lie past eob (bug#468).
+	     (null (char-after flyspell-pre-point))
 	     (eq (char-syntax (char-after flyspell-pre-point)) ?w)))
     nil)
    ((not (eq (current-buffer) flyspell-pre-buffer))