mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

(make-autoload): Also generate autoloads for `defmacro*' forms.

Browse source
This commit is contained in:
Colin Walters 2001-12-04 07:09:26 +00:00
parent c6e75c16f9
commit 74312ddcdf
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/emacs-lisp/autoload.el
View file

@ -87,8 +87,8 @@ or macro definition or a defcustom)."
((memq car '(defun define-skeleton defmacro define-derived-mode ((memq car '(defun define-skeleton defmacro define-derived-mode
define-generic-mode easy-mmode-define-minor-mode define-generic-mode easy-mmode-define-minor-mode
easy-mmode-define-global-mode easy-mmode-define-global-mode
define-minor-mode defun*)) define-minor-mode defun* defmacro*))
(let* ((macrop (eq car 'defmacro)) (let* ((macrop (memq car '(defmacro defmacro*)))
(name (nth 1 form)) (name (nth 1 form))
(body (nthcdr (get car 'doc-string-elt) form)) (body (nthcdr (get car 'doc-string-elt) form))
(doc (if (stringp (car body)) (pop body)))) (doc (if (stringp (car body)) (pop body))))