[COMMIT] don't bomb out when fun has no documentation
NOTE: This patch has been committed.
lisp/ChangeLog addition:
2005-11-13 Ben Wing <ben(a)xemacs.org>
* help.el (function-arglist):
Don't bomb out when fun has no documentation.
build source patch:
Diff command: bash -ci "cvs-diff --show-c-function -no-changelog "
Files affected: lisp/help.el
Index: lisp/help.el
===================================================================
RCS file: /pack/xemacscvs/XEmacs/xemacs/lisp/help.el,v
retrieving revision 1.45
diff -u -p -r1.45 help.el
--- lisp/help.el 2005/10/10 02:45:32 1.45
+++ lisp/help.el 2005/11/13 10:52:06
＠＠ -1186,7 +1186,8 ＠＠ arguments in the standard Lisp style."
(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))))