aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorMiles Bader2000-10-23 10:27:47 +0000
committerMiles Bader2000-10-23 10:27:47 +0000
commit3b6542bab5e01948a157330c91c4aa273694fe66 (patch)
tree20ad15e98b80ab69df4b42bfe9140d5f7fb439d3
parentcb3069bb5e6a6c7b70d28e09c61ce9b9aea98537 (diff)
downloademacs-3b6542bab5e01948a157330c91c4aa273694fe66.tar.gz
emacs-3b6542bab5e01948a157330c91c4aa273694fe66.zip
(byte-compile-file): Bind `byte-compile-last-logged-file' to nil.
-rw-r--r--lisp/ChangeLog1
-rw-r--r--lisp/emacs-lisp/bytecomp.el3
2 files changed, 3 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index c6af44f9d3c..cbb8d824c28 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -8,6 +8,7 @@
8 `byte-compile-last-logged-file' to it. Test whether 8 `byte-compile-last-logged-file' to it. Test whether
9 byte-compile-current-file equals byte-compile-last-logged-file 9 byte-compile-current-file equals byte-compile-last-logged-file
10 instead of whether its nil. 10 instead of whether its nil.
11 (byte-compile-file): Bind `byte-compile-last-logged-file' to nil.
11 12
122000-10-23 Stefan Monnier <monnier@cs.yale.edu> 132000-10-23 Stefan Monnier <monnier@cs.yale.edu>
13 14
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index bd8cd8c88af..1c75f5e5736 100644
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -10,7 +10,7 @@
10 10
11;;; This version incorporates changes up to version 2.10 of the 11;;; This version incorporates changes up to version 2.10 of the
12;;; Zawinski-Furuseth compiler. 12;;; Zawinski-Furuseth compiler.
13(defconst byte-compile-version "$Revision: 2.77 $") 13(defconst byte-compile-version "$Revision: 2.78 $")
14 14
15;; This file is part of GNU Emacs. 15;; This file is part of GNU Emacs.
16 16
@@ -1349,6 +1349,7 @@ The value is t if there were no errors, nil if errors."
1349 (if byte-compile-verbose 1349 (if byte-compile-verbose
1350 (message "Compiling %s..." filename)) 1350 (message "Compiling %s..." filename))
1351 (let ((byte-compile-current-file filename) 1351 (let ((byte-compile-current-file filename)
1352 (byte-compile-last-logged-file nil)
1352 (set-auto-coding-for-load t) 1353 (set-auto-coding-for-load t)
1353 target-file input-buffer output-buffer 1354 target-file input-buffer output-buffer
1354 byte-compile-dest-file) 1355 byte-compile-dest-file)