Add command that's like "q" quit that gets you out of shortkey mode, but doesn't...

diff --git a/dbgr/common/cmds.el b/dbgr/common/cmds.el
index a645412a17972a70fce55d9cf2f321fd83a87bfb..d408968f785d7ea684128830fa57b114eb226db0 100644 (file)
--- a/dbgr/common/cmds.el
+++ b/dbgr/common/cmds.el
@@ -144,6 +144,16 @@ getting stepped."
     (dbgr-cmd-remap arg "step" "step %p" "s")
 )
 
+(defun dbgr-cmd-terminate (&optional arg)
+  "Gently terminate source and command buffers without possibly
+issuing a command to the underlying debuger.  Use this if the
+underlying debugger has died or you want to get out of all
+shortkey modes in the source window and possibly restart
+debugging after editing source."
+  (interactive "p")
+  (dbgr-terminate (current-buffer))
+)
+
 (defun dbgr-cmd-quit (&optional arg)
   "Gently terminate execution of the debugged program."
   (interactive "p")

diff --git a/dbgr/common/key.el b/dbgr/common/key.el
index c8ed582652ca3707a4f8e85583a2a08804835c0a..25f986e9e55fd2371cee7dcf94da4227c6a3e46c 100644 (file)
--- a/dbgr/common/key.el
+++ b/dbgr/common/key.el
@@ -95,6 +95,7 @@ Nor does it touch prefix keys; for that see `dbgr-populate-keys-standard'"
     (define-key map "u" 'dbgr-cmd-older-frame)
     (define-key map "C" 'dbgr-window-cmd-undisturb-src)
     (define-key map "F" 'dbgr-window-bt)
+    (define-key map "Q" 'dbgr-cmd-terminate)
     (define-key map "S" 'dbgr-window-src-undisturb-cmd)
 
     (define-key map [M-down]    'dbgr-track-hist-newer)