(make-autoload): Other typo. I'm getting tired.

diff --git a/lisp/emacs-lisp/autoload.el b/lisp/emacs-lisp/autoload.el
index b9edcdb8ffdbe35f2212547b66196fd484cd4d0e..3d1833c2fb393beee41cbbc7e6ee246d81d7af8b 100644 (file)
--- a/lisp/emacs-lisp/autoload.el
+++ b/lisp/emacs-lisp/autoload.el
@@ -77,7 +77,7 @@ Returns nil if FORM is not a function or variable or macro definition."
                                      define-generic-mode
                                      easy-mmode-define-minor-mode
                                      define-minor-mode)) t)
-                   (eq (car-safe (car form)) 'interactive))
+                   (eq (car-safe (car body)) 'interactive))
                (if macrop (list 'quote 'macro) nil)))
       ;; Convert defcustom to a simpler (and less space-consuming) defvar,
       ;; but add some extra stuff if it uses :require.