Fix 'apropos-library' for 'define-symbol-props'
* lisp/apropos.el (apropos-library): Sanitize data to avoid signaling errors when 'define-symbol-props' is seen. (Bug#72616)
This commit is contained in:
parent
5c1bd99139
commit
bfe07eca59
1 changed files with 4 additions and 1 deletions
|
@ -734,7 +734,10 @@ the output includes key-bindings of commands."
|
|||
;; FIXME: Print information about each individual method: both
|
||||
;; its docstring and specializers (bug#21422).
|
||||
('cl-defmethod (push (cadr x) provides))
|
||||
(_ (push (or (cdr-safe x) x) symbols))))
|
||||
;; FIXME: Add extension point (bug#72616).
|
||||
(_ (let ((sym (or (cdr-safe x) x)))
|
||||
(and sym (symbolp sym)
|
||||
(push sym symbols))))))
|
||||
(let ((apropos-pattern "") ;Dummy binding for apropos-symbols-internal.
|
||||
(text
|
||||
(concat
|
||||
|
|
Loading…
Reference in a new issue