diff options
| author | Richard M. Stallman <rms@gnu.org> | 1997-06-09 16:42:34 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1997-06-09 16:42:34 +0000 |
| commit | 5d61e42c15fba4f62adf13d0e642ea83e0ebf510 (patch) | |
| tree | 4359fb2ef5c06c411f0a4f0da63680ce5f827589 /lisp/emacs-lisp/debug.el | |
| parent | d168a5c5142872c2ddf754729df784d63562d532 (diff) | |
| download | emacs-5d61e42c15fba4f62adf13d0e642ea83e0ebf510.tar.gz | |
(debug): Set overriding-terminal-local-map to nil,
don't bind it, so it won't be restored on `q'.
Diffstat (limited to 'lisp/emacs-lisp/debug.el')
| -rw-r--r-- | lisp/emacs-lisp/debug.el | 4 |
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." (debugger-outer-standard-input standard-input) (debugger-outer-standard-output standard-output) (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. (let ((last-command nil) this-command track-mouse (unread-command-char -1) unread-command-events last-input-event last-command-event last-nonmenu-event last-event-frame overriding-local-map - overriding-terminal-local-map load-read-function (standard-input t) (standard-output t) (cursor-in-echo-area nil)) |