summaryrefslogtreecommitdiff
path: root/lisp/help-fns.el
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2017-04-06 09:55:05 -0400
committerStefan Monnier <monnier@iro.umontreal.ca>2017-04-06 09:55:05 -0400
commite3eea9a4b449c87a3bb022098a9e6f1bda805cb3 (patch)
treed8c0845dfd2f44f21d934faca2a868f231a96003 /lisp/help-fns.el
parentf23c82d165bdbca76b7bdcd9370aa3eec906cc92 (diff)
downloademacs-e3eea9a4b449c87a3bb022098a9e6f1bda805cb3.tar.gz
emacs-e3eea9a4b449c87a3bb022098a9e6f1bda805cb3.tar.bz2
emacs-e3eea9a4b449c87a3bb022098a9e6f1bda805cb3.zip
* lisp/help-fns.el (describe-symbol): `nil' is not an interesting default.
Diffstat (limited to 'lisp/help-fns.el')
-rw-r--r--lisp/help-fns.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index 69a6113eda1..5459ddf4a39 100644
--- a/lisp/help-fns.el
+++ b/lisp/help-fns.el
@@ -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)