diff options
| author | Jim Blandy <jimb@redhat.com> | 1992-11-07 06:10:53 +0000 |
|---|---|---|
| committer | Jim Blandy <jimb@redhat.com> | 1992-11-07 06:10:53 +0000 |
| commit | 448933608477ddfb8158097cfc6dca62ad8d7b88 (patch) | |
| tree | 6155dfb634cc3d73f4c3c040144834e728edd13b /lisp/emacs-lisp | |
| parent | 45c18993b7f4958b2e6b3ae3895786264b05c8f4 (diff) | |
| download | emacs-448933608477ddfb8158097cfc6dca62ad8d7b88.tar.gz emacs-448933608477ddfb8158097cfc6dca62ad8d7b88.tar.bz2 emacs-448933608477ddfb8158097cfc6dca62ad8d7b88.zip | |
* autoload.el (make-autoload): When creating an autoload
invocation for a macro, pass (list 'quote 'macro) as the sixth
argument, not just t. autoload's sixth argument is now a type
instead of just a boolean value, so we should use a value which
reflects that.
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/autoload.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/autoload.el b/lisp/emacs-lisp/autoload.el index 17dbfd7c7b5..117e8355f67 100644 --- a/lisp/emacs-lisp/autoload.el +++ b/lisp/emacs-lisp/autoload.el @@ -39,7 +39,8 @@ Returns nil if FORM is not a defun or defmacro." (setq form (cdr form)) (setq doc nil)) (list 'autoload (list 'quote name) file doc - (eq (car-safe (car form)) 'interactive) macrop)) + (eq (car-safe (car form)) 'interactive) + (if macrop (list 'quote 'macro) nil))) nil))) (defconst generate-autoload-cookie ";;;###autoload" |