diff options
author | Stefan Monnier <monnier@iro.umontreal.ca> | 2003-05-06 13:54:21 +0000 |
---|---|---|
committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2003-05-06 13:54:21 +0000 |
commit | f8daddcffbc9e2bd3e57874880ca40acf9943ef2 (patch) | |
tree | 8fe335cdd7eb5334b26752062cddd449219c4539 /lisp/help-fns.el | |
parent | be5d837275e73854597dd9e3375c6c648ef10c58 (diff) | |
download | emacs-f8daddcffbc9e2bd3e57874880ca40acf9943ef2.tar.gz |
(help-add-fundoc-usage): Use t for "no arglist".
Diffstat (limited to 'lisp/help-fns.el')
-rw-r--r-- | lisp/help-fns.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/help-fns.el b/lisp/help-fns.el index c6011b62e97..7454f8ea105 100644 --- a/lisp/help-fns.el +++ b/lisp/help-fns.el @@ -176,9 +176,9 @@ DEF is the function whose usage we're looking for in DOC." "Add the usage info to the docstring DOC. If DOC already has a usage info, then just return DOC unchanged. The usage info is built from ARGLIST. DOC can be nil. -ARGLIST can also be nil or a string of the form \"(fun ARG1 ARG2 ...)\"." +ARGLIST can also be t or a string of the form \"(fun ARG1 ARG2 ...)\"." (unless (stringp doc) (setq doc "Not documented")) - (if (or (string-match "\n\n(fn\\(\\( .*\\)?)\\)\\'" doc) (not arglist)) + (if (or (string-match "\n\n(fn\\(\\( .*\\)?)\\)\\'" doc) (eq arglist t)) doc (format "%s%s%s" doc (if (string-match "\n?\n\\'" doc) |