procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(debug): Set overriding-terminal-local-map to nil,

Browse source 
don't bind it, so it won't be restored on `q'.
This commit is contained in:
Richard M. Stallman 1997-06-09 16:42:34 +00:00
parent c5ee9ef188
commit 9d07cf38e7
1 changed files with 3 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/emacs-lisp/debug.el
View file

@ -98,13 +98,15 @@ first will be printed into the backtrace buffer."
(debugger-outer-standard-input standard-input) (debugger-outer-standard-input standard-input)
(debugger-outer-standard-output standard-output) (debugger-outer-standard-output standard-output)
(debugger-outer-cursor-in-echo-area cursor-in-echo-area)) (debugger-outer-cursor-in-echo-area cursor-in-echo-area))
;; Set this instead of binding it, so that `q'
;; will not restore it.
(setq overriding-terminal-local-map nil)
;; Don't let these magic variables affect the debugger itself. ;; Don't let these magic variables affect the debugger itself.
(let ((last-command nil) this-command track-mouse (let ((last-command nil) this-command track-mouse
(unread-command-char -1) unread-command-events (unread-command-char -1) unread-command-events
last-input-event last-command-event last-nonmenu-event last-input-event last-command-event last-nonmenu-event
last-event-frame last-event-frame
overriding-local-map overriding-local-map
overriding-terminal-local-map
load-read-function load-read-function
(standard-input t) (standard-output t) (standard-input t) (standard-output t)
(cursor-in-echo-area nil)) (cursor-in-echo-area nil))