(byte-compile-lambda): Fix previous change.

diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index 4ad85fe76e42388201f1c6517c3842dbb721479e..eec97331f67402e04847cd68bf53775a1a9ad59a 100644 (file)
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -9,7 +9,7 @@
 
 ;;; This version incorporates changes up to version 2.10 of the 
 ;;; Zawinski-Furuseth compiler.
-(defconst byte-compile-version "$Revision: 2.44 $")
+(defconst byte-compile-version "$Revision: 2.45 $")
 
 ;; This file is part of GNU Emacs.
 
@@ -2040,7 +2040,7 @@ If FORM is a lambda or a macro, byte-compile it as a function."
                  (prog1 (car body)
                    ;; Discard the doc string
                    ;; unless it is the last element of the body.
-                   (if (nthcdr 2 body)
+                   (if (cdr body)
                        (setq body (cdr body))))))
         (int (assq 'interactive body)))
     (cond (int