diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2019-03-08 17:27:38 -0500 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2019-03-08 17:27:38 -0500 |
| commit | 01b099bb3db740d53f3e79f3183767b071ddf6f9 (patch) | |
| tree | a14f82bb47f9532e82b75b0cfcfcb68c04799e2c /lisp/emacs-lisp/autoload.el | |
| parent | 76fdae8549ab54bd075520134deec0d69ac6987d (diff) | |
| download | emacs-01b099bb3db740d53f3e79f3183767b071ddf6f9.tar.gz | |
* lisp/emacs-lisp/autoload.el (make-autoload): Don't add useless doc
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.
Diffstat (limited to 'lisp/emacs-lisp/autoload.el')
| -rw-r--r-- | lisp/emacs-lisp/autoload.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/autoload.el b/lisp/emacs-lisp/autoload.el index a369d972126..19e1e93621d 100644 --- a/lisp/emacs-lisp/autoload.el +++ b/lisp/emacs-lisp/autoload.el @@ -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))) |