summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1997-09-15 03:29:47 +0000
committerRichard M. Stallman <rms@gnu.org>1997-09-15 03:29:47 +0000
commit17b76fbd4c9b5ce720c2f21bf8846fd0207449a5 (patch)
tree8f54304853e6883c435094aba2b739c35cc41d63 /lisp/emacs-lisp
parentf37bbf08858a55f6fff15798cded0eafd3652c2e (diff)
downloademacs-17b76fbd4c9b5ce720c2f21bf8846fd0207449a5.tar.gz
emacs-17b76fbd4c9b5ce720c2f21bf8846fd0207449a5.tar.bz2
emacs-17b76fbd4c9b5ce720c2f21bf8846fd0207449a5.zip
(edebug-enter): Save, and bind to nil,
overriding-local-map and overriding-terminal-local-map.
Diffstat (limited to 'lisp/emacs-lisp')
-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."
(defvar edebug-outside-debug-on-error) ; the value of debug-on-error outside
(defvar edebug-outside-debug-on-quit) ; the value of debug-on-quit outside
+(defvar edebug-outside-overriding-local-map)
+(defvar edebug-outside-overriding-terminal-local-map)
+
(defvar edebug-outside-pre-command-hook)
(defvar edebug-outside-post-command-hook)
@@ -2292,6 +2295,10 @@ error is signaled again."
;; Lexical bindings must be uncompiled for this to work.
(cl-lexical-debug t)
+ (edebug-outside-overriding-local-map overriding-local-map)
+ (edebug-outside-overriding-terminal-local-map
+ overriding-terminal-local-map)
+
;; Save the outside value of executing macro. (here??)
(edebug-outside-executing-macro executing-kbd-macro)
(edebug-outside-pre-command-hook pre-command-hook)
@@ -2303,6 +2310,10 @@ error is signaled again."
(executing-kbd-macro
(if edebug-continue-kbd-macro executing-kbd-macro))
+ ;; Don't get confused by the user's keymap changes.
+ (overriding-local-map nil)
+ (overriding-terminal-local-map nil)
+
(signal-hook-function 'edebug-signal)
;; Disable command hooks. This is essential when