Handle anonymous commands in C-h K

* lisp/info.el (Info-goto-emacs-key-command-node): Don't call
Info-goto-emacs-command-node for anonymous commands.  (Bug#61505)

1 files changed, 4 insertions, 1 deletions

diff --git a/lisp/info.el b/lisp/info.el
index f4384934155..02ba8b0eff9 100644
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -4733,8 +4733,11 @@ the variable `Info-file-list-for-emacs'."
                 (eq command 'execute-extended-command))
            (Info-goto-emacs-command-node
             (read-command "Find documentation for command: ")))
+          ((symbolp command)
+           (Info-goto-emacs-command-node command))
           (t
-           (Info-goto-emacs-command-node command)))))
+           (message "%s invokes an anonymous command"
+                    (key-description key))))))
 
 (defvar Info-link-keymap
   (let ((keymap (make-sparse-keymap)))