From: Gerd Moellmann <gerd@gnu.org>
Date: Mon, 12 Mar 2001 15:14:11 +0000 (+0000)
Subject: (command_loop_1): Set Vdeactivate_mark to nil
X-Git-Tag: emacs-pretest-21.0.100~54
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a7b772c166170e9443a83380272180a81785e6e7;p=emacs.git

(command_loop_1): Set Vdeactivate_mark to nil
before running the command; timer functions or process
filters may have set it.
---

diff --git a/src/keyboard.c b/src/keyboard.c
index d3b6cd23a42..a536af4aae4 100644
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -1280,10 +1280,11 @@ DEFUN ("abort-recursive-edit", Fabort_recursive_edit, Sabort_recursive_edit, 0,
 /* This is the actual command reading loop,
    sans error-handling encapsulation.  */
 
-Lisp_Object Fcommand_execute ();
-static int read_key_sequence ();
-void safe_run_hooks ();
-static void adjust_point_for_property ();
+EXFUN (Fcommand_execute, 4);
+static int read_key_sequence P_ ((Lisp_Object *, int, Lisp_Object,
+				  int, int, int));
+void safe_run_hooks P_ ((Lisp_Object));
+static void adjust_point_for_property P_ ((int));
 
 Lisp_Object
 command_loop_1 ()
@@ -1478,6 +1479,10 @@ command_loop_1 ()
          this variable differently.  */
       Vdisable_point_adjustment = Qnil;
 
+      /* Process filters and timers may have messed with deactivate-mark.
+	 reset it before we execute the command. */
+      Vdeactivate_mark = Qnil;
+
       /* Execute the command.  */
 
       Vthis_command = cmd;