# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 790541388 0
# Node ID b0ac61aef33648750527bc69f03411eb55277760
# Parent  4d87344e6dfb423d788d72906708efcc23797562
(make-help-screen): Use *only* local-map to look up keys.

diff -r 4d87344e6dfb -r b0ac61aef336 lisp/help-macro.el
--- a/lisp/help-macro.el	Thu Jan 19 07:25:03 1995 +0000
+++ b/lisp/help-macro.el	Thu Jan 19 18:49:48 1995 +0000
@@ -150,9 +150,7 @@
 			 (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