(flyspell-post-command-hook): Bind deactivate-mark to prevent deactivation.

This commit is contained in:
Richard M. Stallman 2005-11-03 21:33:22 +00:00
parent 33a992c298
commit 3c8404e66f

View file

@ -895,7 +895,9 @@ Mostly we check word delimiters."
(defun flyspell-post-command-hook ()
"The `post-command-hook' used by flyspell to check a word in-the-fly."
(interactive)
(let ((command this-command))
(let ((command this-command)
;; Prevent anything we do from affecting the mark.
deactivate-mark)
(if (flyspell-check-pre-word-p)
(save-excursion
'(flyspell-debug-signal-pre-word-checked)