# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 960187031 0
# Node ID b82691dc560eea6e1eb9d7048ca546287080326f
# Parent  a6cd51379a76b550c2301271ff8b75407812982e
(make-autoload): Other typo.  I'm getting tired.

diff -r a6cd51379a76 -r b82691dc560e lisp/emacs-lisp/autoload.el
--- a/lisp/emacs-lisp/autoload.el	Mon Jun 05 06:33:44 2000 +0000
+++ b/lisp/emacs-lisp/autoload.el	Mon Jun 05 06:37:11 2000 +0000
@@ -77,7 +77,7 @@
 				      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.