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)))