From: Richard M. Stallman Date: Thu, 3 Nov 2005 21:33:22 +0000 (+0000) Subject: (flyspell-post-command-hook): Bind deactivate-mark to prevent deactivation. X-Git-Tag: emacs-pretest-22.0.90~6089 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=3c8404e66f25b531885c0b5f443f884c30b9bc4e;p=emacs.git (flyspell-post-command-hook): Bind deactivate-mark to prevent deactivation. --- diff --git a/lisp/textmodes/flyspell.el b/lisp/textmodes/flyspell.el index f65ffd0ba5c..0f0394ad4ea 100644 --- a/lisp/textmodes/flyspell.el +++ b/lisp/textmodes/flyspell.el @@ -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)