From f8daddcffbc9e2bd3e57874880ca40acf9943ef2 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Tue, 6 May 2003 13:54:21 +0000 Subject: (help-add-fundoc-usage): Use t for "no arglist". --- lisp/help-fns.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'lisp/help-fns.el') 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) -- cgit v1.2.1