From: Kim F. Storm <storm@cua.dk>
Date: Fri, 21 May 2004 23:36:38 +0000 (+0000)
Subject: (struct backtrace): Add debug_on_exit member.
X-Git-Tag: ttn-vms-21-2-B4~6112
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=080e18b104328c5f66b87429562f093029084f1e;p=emacs.git

(struct backtrace): Add debug_on_exit member.
(Fcommand_execute): Clear it.
---

diff --git a/src/keyboard.c b/src/keyboard.c
index 0102c5cd438..ffa047b27d2 100644
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -117,6 +117,8 @@ struct backtrace
 			   args points to slot holding list of
 			   unevalled args */
     char evalargs;
+    /* Nonzero means call value of debugger when done with this operation. */
+    char debug_on_exit;
   };
 
 #ifdef MULTI_KBOARD
@@ -9675,6 +9677,7 @@ a special event, so ignore the prefix argument and don't clear it.  */)
       backtrace.args = &cmd;
       backtrace.nargs = 1;
       backtrace.evalargs = 0;
+      backtrace.debug_on_exit = 0;
 
       tem = Fcall_interactively (cmd, record_flag, keys);