diff options
| author | Stefan Monnier | 2019-03-08 17:27:38 -0500 |
|---|---|---|
| committer | Stefan Monnier | 2019-03-08 17:27:38 -0500 |
| commit | 01b099bb3db740d53f3e79f3183767b071ddf6f9 (patch) | |
| tree | a14f82bb47f9532e82b75b0cfcfcb68c04799e2c | |
| parent | 76fdae8549ab54bd075520134deec0d69ac6987d (diff) | |
| download | emacs-01b099bb3db740d53f3e79f3183767b071ddf6f9.tar.gz emacs-01b099bb3db740d53f3e79f3183767b071ddf6f9.zip | |
* 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.
| -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." | |||
| 146 | t)))) | 146 | t)))) |
| 147 | ;; Add the usage form at the end where describe-function-1 | 147 | ;; Add the usage form at the end where describe-function-1 |
| 148 | ;; can recover it. | 148 | ;; can recover it. |
| 149 | (when (listp args) (setq doc (help-add-fundoc-usage doc args))) | 149 | (when (consp args) (setq doc (help-add-fundoc-usage doc args))) |
| 150 | ;; (message "autoload of %S" (nth 1 form)) | 150 | ;; (message "autoload of %S" (nth 1 form)) |
| 151 | `(autoload ,(nth 1 form) ,file ,doc ,interactive ,type))) | 151 | `(autoload ,(nth 1 form) ,file ,doc ,interactive ,type))) |
| 152 | 152 | ||