aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman1997-06-09 16:42:34 +0000
committerRichard M. Stallman1997-06-09 16:42:34 +0000
commit9d07cf38e762080f13ab7a6a7a6c67daf20cfedc (patch)
tree7c2c340854b6d0f4c3b689802ee8b6f46dc27253
parentc5ee9ef188ec64ee24b95e66691b6edade5f0193 (diff)
downloademacs-9d07cf38e762080f13ab7a6a7a6c67daf20cfedc.tar.gz
emacs-9d07cf38e762080f13ab7a6a7a6c67daf20cfedc.zip
(debug): Set overriding-terminal-local-map to nil,
don't bind it, so it won't be restored on `q'.
-rw-r--r--lisp/emacs-lisp/debug.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/debug.el b/lisp/emacs-lisp/debug.el
index e258533bf15..d3383992f54 100644
--- a/lisp/emacs-lisp/debug.el
+++ b/lisp/emacs-lisp/debug.el
@@ -98,13 +98,15 @@ first will be printed into the backtrace buffer."
98 (debugger-outer-standard-input standard-input) 98 (debugger-outer-standard-input standard-input)
99 (debugger-outer-standard-output standard-output) 99 (debugger-outer-standard-output standard-output)
100 (debugger-outer-cursor-in-echo-area cursor-in-echo-area)) 100 (debugger-outer-cursor-in-echo-area cursor-in-echo-area))
101 ;; Set this instead of binding it, so that `q'
102 ;; will not restore it.
103 (setq overriding-terminal-local-map nil)
101 ;; Don't let these magic variables affect the debugger itself. 104 ;; Don't let these magic variables affect the debugger itself.
102 (let ((last-command nil) this-command track-mouse 105 (let ((last-command nil) this-command track-mouse
103 (unread-command-char -1) unread-command-events 106 (unread-command-char -1) unread-command-events
104 last-input-event last-command-event last-nonmenu-event 107 last-input-event last-command-event last-nonmenu-event
105 last-event-frame 108 last-event-frame
106 overriding-local-map 109 overriding-local-map
107 overriding-terminal-local-map
108 load-read-function 110 load-read-function
109 (standard-input t) (standard-output t) 111 (standard-input t) (standard-output t)
110 (cursor-in-echo-area nil)) 112 (cursor-in-echo-area nil))