summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1997-06-22 23:08:47 +0000
committerRichard M. Stallman <rms@gnu.org>1997-06-22 23:08:47 +0000
commit1c57117e754657836c62597b60b1269161d525a2 (patch)
treebb4ccfc45b18645e70a2935e8237835f6d4f54d2
parentf846bc3668d5045e724ee1e9bf21396cb6da8b7d (diff)
downloademacs-1c57117e754657836c62597b60b1269161d525a2.tar.gz
(byte-compile-file): Doc fix.
(batch-byte-compile-file): Return what byte-compile-file returns.
-rw-r--r--lisp/emacs-lisp/bytecomp.el7
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index 6d18fe610d3..0a4d932b73c 100644
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -10,7 +10,7 @@
;;; This version incorporates changes up to version 2.10 of the
;;; Zawinski-Furuseth compiler.
-(defconst byte-compile-version "$Revision: 2.28 $")
+(defconst byte-compile-version "$Revision: 2.29 $")
;; This file is part of GNU Emacs.
@@ -1203,7 +1203,8 @@ recompile every `.el' file that already has a `.elc' file."
(defun byte-compile-file (filename &optional load)
"Compile a file of Lisp code named FILENAME into a file of byte code.
The output file's name is made by appending `c' to the end of FILENAME.
-With prefix arg (noninteractively: 2nd arg), load the file after compiling."
+With prefix arg (noninteractively: 2nd arg), load the file after compiling.
+The value is t if there were no errors, nil if errors."
;; (interactive "fByte compile file: \nP")
(interactive
(let ((file buffer-file-name)
@@ -3317,7 +3318,7 @@ For example, invoke \"emacs -batch -f batch-byte-compile $emacs/ ~/*.el\""
(defun batch-byte-compile-file (file)
(condition-case err
- (progn (byte-compile-file file) t)
+ (byte-compile-file file)
(error
(message (if (cdr err)
">>Error occurred processing %s: %s (%s)"