From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Thu, 28 Apr 2022 10:16:35 +0000 (+0200)
Subject: Fix another help-fns--insert-menu-bindings parsing problem
X-Git-Tag: emacs-29.0.90~1931^2~248
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c7d49f91dac8afeb85cb8ee2b209f7ca4b363a4d;p=emacs.git

Fix another help-fns--insert-menu-bindings parsing problem

* lisp/help-fns.el (help-fns--insert-menu-bindings): Fix keymap
traversal when elements are symbols.
---

diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index 9a6225d8589..0cb2c6d5d77 100644
--- a/lisp/help-fns.el
+++ b/lisp/help-fns.el
@@ -592,6 +592,8 @@ the C sources, too."
            (start (point)))
        (seq-do-indexed
         (lambda (entry level)
+          (when (symbolp map)
+            (setq map (symbol-function map)))
           (when-let ((elem (assq entry (cdr map))))
             (when heading
               (insert heading)