Mercurial > emacs
changeset 47344:0b6b707c1e14
(byte-compile-file): Don't switch buffer.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Mon, 09 Sep 2002 21:41:34 +0000 |
| parents | 339f02464785 |
| children | 8268e926d8e9 |
| files | lisp/emacs-lisp/bytecomp.el |
| diffstat | 1 files changed, 5 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emacs-lisp/bytecomp.el Mon Sep 09 21:37:28 2002 +0000 +++ b/lisp/emacs-lisp/bytecomp.el Mon Sep 09 21:41:34 2002 +0000 @@ -10,7 +10,7 @@ ;;; This version incorporates changes up to version 2.10 of the ;;; Zawinski-Furuseth compiler. -(defconst byte-compile-version "$Revision: 2.112 $") +(defconst byte-compile-version "$Revision: 2.113 $") ;; This file is part of GNU Emacs. @@ -1554,7 +1554,9 @@ ;; It is important that input-buffer not be current at this call, ;; so that the value of point set in input-buffer ;; within byte-compile-from-buffer lingers in that buffer. - (setq output-buffer (byte-compile-from-buffer input-buffer filename)) + (setq output-buffer + (save-current-buffer + (byte-compile-from-buffer input-buffer filename))) (if byte-compiler-error-flag nil (when byte-compile-verbose @@ -3833,7 +3835,7 @@ ;;;###autoload (defun batch-byte-recompile-directory () - "Runs `byte-recompile-directory' on the dirs remaining on the command line. + "Run `byte-recompile-directory' on the dirs remaining on the command line. Must be used only with `-batch', and kills Emacs on completion. For example, invoke `emacs -batch -f batch-byte-recompile-directory .'." ;; command-line-args-left is what is left of the command line (startup.el)