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

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

Browse Source
This commit is contained in:
Stefan Monnier 2017-04-06 09:55:05 -04:00
parent f23c82d165
commit e3eea9a4b4
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/help-fns.el
View File

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