From: Richard M. Stallman <rms@gnu.org>
Date: Thu, 19 Jan 1995 18:49:48 +0000 (+0000)
Subject: (make-help-screen): Use *only* local-map to look up keys.
X-Git-Tag: emacs-19.34~5381
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7ffbe7e224a99ba7fb694707501a8d013a6ae66a;p=emacs.git

(make-help-screen): Use *only* local-map to look up keys.
---

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