summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1995-01-19 18:49:48 +0000
committerRichard M. Stallman <rms@gnu.org>1995-01-19 18:49:48 +0000
commit7ffbe7e224a99ba7fb694707501a8d013a6ae66a (patch)
tree62a8309ebde670e784f5f6c9c84b1777ccc7b1b7 /lisp
parent77223f057e9abfff847161adcc7a22c1e924e494 (diff)
downloademacs-7ffbe7e224a99ba7fb694707501a8d013a6ae66a.tar.gz
(make-help-screen): Use *only* local-map to look up keys.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/help-macro.el4
1 files changed, 1 insertions, 3 deletions
diff --git a/lisp/help-macro.el b/lisp/help-macro.el
index 1e70992e296..1053b4161b6 100644
--- a/lisp/help-macro.el
+++ b/lisp/help-macro.el
@@ -150,9 +150,7 @@ and then returns."
(setq unread-command-events
(cons char unread-command-events)
config nil)
- (let ((defn
- (let ((overriding-local-map local-map))
- (key-binding key))))
+ (let ((defn (lookup-key local-map key)))
(if defn
(progn
(if config