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

[Miles Bader]

Index: emacs/lisp/emacs-lisp/autoload.el
diff -c emacs/lisp/emacs-lisp/autoload.el:1.98.4.2 
emacs/lisp/emacs-lisp/autoload.el:1.98.4.3
*** emacs/lisp/emacs-lisp/autoload.el:1.98.4.2  Mon Jun 28 07:29:45 2004
--- emacs/lisp/emacs-lisp/autoload.el   Thu Sep  9 09:36:32 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))))