# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1131053602 0
# Node ID 344a573ab7a316d395ce9b58532d97f9713502db
# Parent  127ab86e8386a9641c0165b92c9be258e7f71d57
(flyspell-post-command-hook): Bind deactivate-mark to prevent deactivation.

diff -r 127ab86e8386 -r 344a573ab7a3 lisp/textmodes/flyspell.el
--- a/lisp/textmodes/flyspell.el	Thu Nov 03 21:32:08 2005 +0000
+++ b/lisp/textmodes/flyspell.el	Thu Nov 03 21:33:22 2005 +0000
@@ -895,7 +895,9 @@
 (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)