aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman2006-01-26 17:55:32 +0000
committerRichard M. Stallman2006-01-26 17:55:32 +0000
commit5effb4d80fc9627633c71b372f602b9de3295980 (patch)
treeed60972c0f310b3edef95879ee95fbe2e2ed1099
parentf36d46caffc209065f29e7e7fa8daa01994d2e88 (diff)
downloademacs-5effb4d80fc9627633c71b372f602b9de3295980.tar.gz
emacs-5effb4d80fc9627633c71b372f602b9de3295980.zip
(describe-function): Don't pass `nil' as default.
-rw-r--r--lisp/help-fns.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index 14ceacfd92f..32719275edd 100644
--- a/lisp/help-fns.el
+++ b/lisp/help-fns.el
@@ -113,7 +113,8 @@ With ARG, you are asked to choose which language."
113 (setq val (completing-read (if fn 113 (setq val (completing-read (if fn
114 (format "Describe function (default %s): " fn) 114 (format "Describe function (default %s): " fn)
115 "Describe function: ") 115 "Describe function: ")
116 obarray 'fboundp t nil nil (symbol-name fn))) 116 obarray 'fboundp t nil nil
117 (and fn (symbol-name fn))))
117 (list (if (equal val "") 118 (list (if (equal val "")
118 fn (intern val))))) 119 fn (intern val)))))
119 (if (null function) 120 (if (null function)