Fix bug #26529: C-h k errors with a lambda function bound to a key.

* lisp/help-fns.el (help-fns--signature, describe-function-1): Check
`function' is a symbol before trying to get property `reader-construct' from
it.

diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index 5459ddf4a392b799dac5d3113e0f987e39418dcf..2c635ffa5005b93c11be5d019a5a1a395c1c9976 100644 (file)
--- a/lisp/help-fns.el
+++ b/lisp/help-fns.el
@@ -473,7 +473,8 @@ suitable file is found, return nil."
         (let ((fill-begin (point))
               (high-usage (car high))
               (high-doc (cdr high)))
-          (unless (get function 'reader-construct)
+          (unless (and (symbolp function)
+                       (get function 'reader-construct))
             (insert high-usage "\n"))
           (fill-region fill-begin (point))
           high-doc)))))
@@ -613,7 +614,8 @@ FILE is the file where FUNCTION was probably defined."
     ;; Print what kind of function-like object FUNCTION is.
     (princ (cond ((or (stringp def) (vectorp def))
                  "a keyboard macro")
-                ((get function 'reader-construct)
+                ((and (symbolp function)
+                       (get function 'reader-construct))
                   "a reader construct")
                 ;; Aliases are Lisp functions, so we need to check
                 ;; aliases before functions.