]> git.eshelyaron.com Git - emacs.git/commitdiff
* lisp/emacs-lisp/autoload.el (make-autoload): Don't add useless doc
authorStefan Monnier <monnier@iro.umontreal.ca>
Fri, 8 Mar 2019 22:27:38 +0000 (17:27 -0500)
committerStefan Monnier <monnier@iro.umontreal.ca>
Fri, 8 Mar 2019 22:27:38 +0000 (17:27 -0500)
More specifically, don't add a useless '(fn)' to the docstring for
functions which take no arguments.
This should fix the 'No docstring slot for pcase--make-docstring'
warning during bootstrap.

lisp/emacs-lisp/autoload.el

index a369d9721264a28fc6a19283f60234561e193a6a..19e1e93621dc1e88c79a79fd8fb639bbad46b412 100644 (file)
@@ -146,7 +146,7 @@ expression, in which case we want to handle forms differently."
                            t))))
         ;; Add the usage form at the end where describe-function-1
         ;; can recover it.
-        (when (listp args) (setq doc (help-add-fundoc-usage doc args)))
+        (when (consp args) (setq doc (help-add-fundoc-usage doc args)))
         ;; (message "autoload of %S" (nth 1 form))
         `(autoload ,(nth 1 form) ,file ,doc ,interactive ,type)))