From a2bb8f73f210ef9a5472d3943e376ed011c80429 Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Wed, 23 Feb 1994 19:17:57 +0000 Subject: (byte-compile-file): Return nil on failure. --- lisp/emacs-lisp/bytecomp.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'lisp/emacs-lisp/bytecomp.el') diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el index dc4476866f1..b72e5bcd0df 100644 --- a/lisp/emacs-lisp/bytecomp.el +++ b/lisp/emacs-lisp/bytecomp.el @@ -1200,8 +1200,8 @@ With prefix arg (noninteractively: 2nd arg), load the file after compiling." (save-excursion (display-call-tree filename))) (if load - (load target-file)))) - t) + (load target-file)) + t))) ;;(defun byte-compile-and-load-file (&optional filename) ;; "Compile a file of Lisp code named FILENAME into a file of byte code, -- cgit v1.2.3