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

diff --git a/lisp/help-macro.el b/lisp/help-macro.el
index 1e70992e296f8b234315e13605f475b6fe28880a..1053b4161b6a17d0648627dc4a56b20d55d2dac7 100644 (file)
--- 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