1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-28 07:45:00 +00:00

* lisp/help-fns.el (describe-symbol): `nil' is not an interesting default.

This commit is contained in:
Stefan Monnier 2017-04-06 09:55:05 -04:00
parent f23c82d165
commit e3eea9a4b4

View File

@ -1096,8 +1096,8 @@ frame to show the information about SYMBOL; they default to the
current buffer and the selected frame, respectively."
(interactive
(let* ((v-or-f (symbol-at-point))
(found (cl-some (lambda (x) (funcall (nth 1 x) v-or-f))
describe-symbol-backends))
(found (if v-or-f (cl-some (lambda (x) (funcall (nth 1 x) v-or-f))
describe-symbol-backends)))
(v-or-f (if found v-or-f (function-called-at-point)))
(found (or found v-or-f))
(enable-recursive-minibuffers t)