[Emacs-diffs] Changes to emacs/lisp/emacs-lisp/bytecomp.el

[Stefan Monnier]

Index: emacs/lisp/emacs-lisp/bytecomp.el
diff -c emacs/lisp/emacs-lisp/bytecomp.el:2.113 
emacs/lisp/emacs-lisp/bytecomp.el:2.114
*** emacs/lisp/emacs-lisp/bytecomp.el:2.113     Mon Sep  9 15:35:57 2002
--- emacs/lisp/emacs-lisp/bytecomp.el   Mon Sep  9 17:41:34 2002
***************
*** 10,16 ****
  
  ;;; This version incorporates changes up to version 2.10 of the
  ;;; Zawinski-Furuseth compiler.
! (defconst byte-compile-version "$Revision: 2.113 $")
  
  ;; This file is part of GNU Emacs.
  
--- 10,16 ----
  
  ;;; This version incorporates changes up to version 2.10 of the
  ;;; Zawinski-Furuseth compiler.
! (defconst byte-compile-version "$Revision: 2.114 $")
  
  ;; This file is part of GNU Emacs.
  
***************
*** 1554,1560 ****
        ;; 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))
        (if byte-compiler-error-flag
          nil
        (when byte-compile-verbose
--- 1554,1562 ----
        ;; 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
!           (save-current-buffer
!             (byte-compile-from-buffer input-buffer filename)))
        (if byte-compiler-error-flag
          nil
        (when byte-compile-verbose
***************
*** 3833,3839 ****
  
  ;;;###autoload
  (defun batch-byte-recompile-directory ()
!   "Runs `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)
--- 3835,3841 ----
  
  ;;;###autoload
  (defun batch-byte-recompile-directory ()
!   "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)