aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman1997-09-15 03:29:47 +0000
committerRichard M. Stallman1997-09-15 03:29:47 +0000
commit17b76fbd4c9b5ce720c2f21bf8846fd0207449a5 (patch)
tree8f54304853e6883c435094aba2b739c35cc41d63
parentf37bbf08858a55f6fff15798cded0eafd3652c2e (diff)
downloademacs-17b76fbd4c9b5ce720c2f21bf8846fd0207449a5.tar.gz
emacs-17b76fbd4c9b5ce720c2f21bf8846fd0207449a5.zip
(edebug-enter): Save, and bind to nil,
overriding-local-map and overriding-terminal-local-map.
-rw-r--r--lisp/emacs-lisp/edebug.el11
1 files changed, 11 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/edebug.el b/lisp/emacs-lisp/edebug.el
index 442f2cdbf0c..431b15272e7 100644
--- a/lisp/emacs-lisp/edebug.el
+++ b/lisp/emacs-lisp/edebug.el
@@ -2232,6 +2232,9 @@ expressions; a `progn' form will be returned enclosing these forms."
2232(defvar edebug-outside-debug-on-error) ; the value of debug-on-error outside 2232(defvar edebug-outside-debug-on-error) ; the value of debug-on-error outside
2233(defvar edebug-outside-debug-on-quit) ; the value of debug-on-quit outside 2233(defvar edebug-outside-debug-on-quit) ; the value of debug-on-quit outside
2234 2234
2235(defvar edebug-outside-overriding-local-map)
2236(defvar edebug-outside-overriding-terminal-local-map)
2237
2235(defvar edebug-outside-pre-command-hook) 2238(defvar edebug-outside-pre-command-hook)
2236(defvar edebug-outside-post-command-hook) 2239(defvar edebug-outside-post-command-hook)
2237 2240
@@ -2292,6 +2295,10 @@ error is signaled again."
2292 ;; Lexical bindings must be uncompiled for this to work. 2295 ;; Lexical bindings must be uncompiled for this to work.
2293 (cl-lexical-debug t) 2296 (cl-lexical-debug t)
2294 2297
2298 (edebug-outside-overriding-local-map overriding-local-map)
2299 (edebug-outside-overriding-terminal-local-map
2300 overriding-terminal-local-map)
2301
2295 ;; Save the outside value of executing macro. (here??) 2302 ;; Save the outside value of executing macro. (here??)
2296 (edebug-outside-executing-macro executing-kbd-macro) 2303 (edebug-outside-executing-macro executing-kbd-macro)
2297 (edebug-outside-pre-command-hook pre-command-hook) 2304 (edebug-outside-pre-command-hook pre-command-hook)
@@ -2303,6 +2310,10 @@ error is signaled again."
2303 (executing-kbd-macro 2310 (executing-kbd-macro
2304 (if edebug-continue-kbd-macro executing-kbd-macro)) 2311 (if edebug-continue-kbd-macro executing-kbd-macro))
2305 2312
2313 ;; Don't get confused by the user's keymap changes.
2314 (overriding-local-map nil)
2315 (overriding-terminal-local-map nil)
2316
2306 (signal-hook-function 'edebug-signal) 2317 (signal-hook-function 'edebug-signal)
2307 2318
2308 ;; Disable command hooks. This is essential when 2319 ;; Disable command hooks. This is essential when