diff options
| -rw-r--r-- | lisp/emacs-lisp/bytecomp.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el index 743ebea3c1e..5b3a846cd2f 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.137 $") | 13 | (defconst byte-compile-version "$Revision: 2.138 $") |
| 14 | 14 | ||
| 15 | ;; This file is part of GNU Emacs. | 15 | ;; This file is part of GNU Emacs. |
| 16 | 16 | ||
| @@ -975,7 +975,8 @@ Each function's symbol gets marked with the `byte-compile-noruntime' property." | |||
| 975 | (setq default-directory dir) | 975 | (setq default-directory dir) |
| 976 | (unless was-same | 976 | (unless was-same |
| 977 | (insert (format "Entering directory `%s'\n" default-directory)))) | 977 | (insert (format "Entering directory `%s'\n" default-directory)))) |
| 978 | (setq byte-compile-last-logged-file byte-compile-current-file) | 978 | (setq byte-compile-last-logged-file byte-compile-current-file |
| 979 | byte-compile-last-warned-form nil) | ||
| 979 | ;; Do this after setting default-directory. | 980 | ;; Do this after setting default-directory. |
| 980 | (unless (eq major-mode 'compilation-mode) | 981 | (unless (eq major-mode 'compilation-mode) |
| 981 | (compilation-mode)) | 982 | (compilation-mode)) |