Mercurial > emacs
comparison lisp/emacs-lisp/autoload.el @ 1552:f2901040a07b
* 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.
| author | Jim Blandy <jimb@redhat.com> |
|---|---|
| date | Sat, 07 Nov 1992 06:10:53 +0000 |
| parents | 6a0c694bd3a5 |
| children | 4a8bc12e7017 |
comparison
equal
deleted
inserted
replaced
| 1551:1f7d20c707c0 | 1552:f2901040a07b |
|---|---|
| 37 (setq doc (car form)) | 37 (setq doc (car form)) |
| 38 (if (stringp doc) | 38 (if (stringp doc) |
| 39 (setq form (cdr form)) | 39 (setq form (cdr form)) |
| 40 (setq doc nil)) | 40 (setq doc nil)) |
| 41 (list 'autoload (list 'quote name) file doc | 41 (list 'autoload (list 'quote name) file doc |
| 42 (eq (car-safe (car form)) 'interactive) macrop)) | 42 (eq (car-safe (car form)) 'interactive) |
| 43 (if macrop (list 'quote 'macro) nil))) | |
| 43 nil))) | 44 nil))) |
| 44 | 45 |
| 45 (defconst generate-autoload-cookie ";;;###autoload" | 46 (defconst generate-autoload-cookie ";;;###autoload" |
| 46 "Magic comment that tells \\[update-file-autoloads] | 47 "Magic comment that tells \\[update-file-autoloads] |
| 47 to make the following form into an autoload. This string should be | 48 to make the following form into an autoload. This string should be |