(help-add-fundoc-usage): Pass an empty string to `format' if

no newlines are necessary.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 5aede0a254a1f3f286d76eaa4570cbcfc2e661c8..3113adfc023f73846b6e5e5d62793553d2bda04a 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2003-04-12  John Paul Wallington  <jpw@gnu.org>
+
+       * help-fns.el (help-add-fundoc-usage): Pass an empty string to
+       `format' if no newlines are necessary.
+
 2003-04-11  John Paul Wallington  <jpw@gnu.org>
 
        * type-break.el (type-break-warning-countdown-string): Doc fix.

diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index 4f3626c4511ab6f0674ba6042efd4d9e88c6d487..41b002c7e79ebe6c9f448eadcb77316a43de562f 100644 (file)
--- a/lisp/help-fns.el
+++ b/lisp/help-fns.el
@@ -181,7 +181,7 @@ The usage info is built from ARGLIST.  DOC can be nil."
       doc
     (format "%s%s%s" doc
            (if (string-match "\n?\n\\'" doc)
-               (if (< (- (match-end 0) (match-beginning 0)) 2) "\n")
+               (if (< (- (match-end 0) (match-beginning 0)) 2) "\n" "")
              "\n\n")
            (help-make-usage 'fn arglist))))