Mercurial > hg > xemacs-beta
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))))