[Emacs-diffs] Changes to emacs/lisp/emacs-lisp/autoload.el

[Thien-Thi Nguyen]

Index: emacs/lisp/emacs-lisp/autoload.el
diff -c emacs/lisp/emacs-lisp/autoload.el:1.100 
emacs/lisp/emacs-lisp/autoload.el:1.101
*** emacs/lisp/emacs-lisp/autoload.el:1.100     Tue Apr 27 22:45:59 2004
--- emacs/lisp/emacs-lisp/autoload.el   Wed Sep  8 11:06:23 2004
***************
*** 86,91 ****
--- 86,92 ----
  
       ;; 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,100 ****
             (args (case car
                    ((defun defmacro defun* defmacro*) (nth 2 form))
                    ((define-skeleton) '(&optional str arg))
!                   ((define-generic-mode define-derived-mode) nil)
                    (t)))
             (body (nthcdr (get car 'doc-string-elt) form))
             (doc (if (stringp (car body)) (pop body))))
--- 95,102 ----
             (args (case car
                    ((defun defmacro defun* defmacro*) (nth 2 form))
                    ((define-skeleton) '(&optional str arg))
!                   ((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))))