diff options
author | Thien-Thi Nguyen <ttn@gnuvola.org> | 2004-09-08 11:06:23 +0000 |
---|---|---|
committer | Thien-Thi Nguyen <ttn@gnuvola.org> | 2004-09-08 11:06:23 +0000 |
commit | bec34fb05face8154d5dd5fc86d4442ff82c3843 (patch) | |
tree | f6f95e59c8ab0bb75a01b01bf0d8241671ad4913 /lisp | |
parent | d430d2e899912258a1a63750a7de0d9933673345 (diff) | |
download | emacs-bec34fb05face8154d5dd5fc86d4442ff82c3843.tar.gz |
(make-autoload): Handle `define-compilation-mode'.
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/emacs-lisp/autoload.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/autoload.el b/lisp/emacs-lisp/autoload.el index 21843c9601d..5a5eb55a2a2 100644 --- a/lisp/emacs-lisp/autoload.el +++ b/lisp/emacs-lisp/autoload.el @@ -86,6 +86,7 @@ or macro definition or a defcustom)." ;; For special function-like operators, use the `autoload' function. ((memq car '(defun define-skeleton defmacro define-derived-mode + define-compilation-mode define-generic-mode easy-mmode-define-minor-mode easy-mmode-define-global-mode define-minor-mode defun* defmacro*)) @@ -94,7 +95,8 @@ or macro definition or a defcustom)." (args (case car ((defun defmacro defun* defmacro*) (nth 2 form)) ((define-skeleton) '(&optional str arg)) - ((define-generic-mode define-derived-mode) nil) + ((define-generic-mode define-derived-mode + define-compilation-mode) nil) (t))) (body (nthcdr (get car 'doc-string-elt) form)) (doc (if (stringp (car body)) (pop body)))) |