Make help-fns--generalized-variable more resilient

* lisp/help-fns.el (help-fns--generalized-variable): Don't bug out
when a key binding isn't a symbol.

diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index d5b576de2850b452f9df4b2435edbe1f9f5697c1..a3d4e002b6f1a9a6312acc7b255fd6ae46e5814d 100644 (file)
--- a/lisp/help-fns.el
+++ b/lisp/help-fns.el
@@ -1159,7 +1159,8 @@ Returns a list of the form (REAL-FUNCTION DEF ALIASED REAL-DEF)."
 (add-hook 'help-fns-describe-function-functions #'help-fns--compiler-macro 100)
 
 (defun help-fns--generalized-variable (function)
-  (when (and (get function 'gv-expander)
+  (when (and (symbolp function)
+             (get function 'gv-expander)
              ;; Don't mention obsolete generalized variables.
              (not (get function 'byte-obsolete-generalized-variable)))
     (insert (format-message "  `%s' is also a " function)