diff lisp/help.el @ 3065:3fa430e1aa35

[xemacs-hg @ 2005-11-13 10:52:47 by ben] don't bomb out when fun has no documentation help.el: Don't bomb out when fun has no documentation.
author ben
date Sun, 13 Nov 2005 10:52:48 +0000
parents 66ad30774567
children 0f411920c8db
line wrap: on
line diff
--- a/lisp/help.el	Sun Nov 13 10:51:18 2005 +0000
+++ b/lisp/help.el	Sun Nov 13 10:52:48 2005 +0000
@@ -1186,7 +1186,8 @@
 		 (nth 1 fndef))
 		((subrp fndef)
 		 (let* ((doc (documentation function))
-			(args (and (string-match
+			(args (and doc
+				   (string-match
 				    "[\n\t ]*\narguments: ?(\\(.*\\))\n?\\'"
 				    doc)
 				   (match-string 1 doc))))