From: Richard M. Stallman <rms@gnu.org>
Date: Thu, 26 Jan 2006 17:55:32 +0000 (+0000)
Subject: (describe-function): Don't pass `nil' as default.
X-Git-Tag: emacs-pretest-22.0.90~4568
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=5effb4d80fc9627633c71b372f602b9de3295980;p=emacs.git

(describe-function): Don't pass `nil' as default.
---

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."
      (setq val (completing-read (if fn
 				    (format "Describe function (default %s): " fn)
 				  "Describe function: ")
-				obarray 'fboundp t nil nil (symbol-name fn)))
+				obarray 'fboundp t nil nil
+				(and fn (symbol-name fn))))
      (list (if (equal val "")
 	       fn (intern val)))))
   (if (null function)