changeset 6554:5f8effa94d20

(byte-compile-file): Use whole file name for errors.
author Richard M. Stallman <rms@gnu.org>
date Mon, 28 Mar 1994 07:05:55 +0000
parents fca6271b0983
children 771fa0ddb356
files lisp/emacs-lisp/bytecomp.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emacs-lisp/bytecomp.el	Mon Mar 28 06:08:35 1994 +0000
+++ b/lisp/emacs-lisp/bytecomp.el	Mon Mar 28 07:05:55 1994 +0000
@@ -1145,7 +1145,7 @@
 
   (if byte-compile-verbose
       (message "Compiling %s..." filename))
-  (let ((byte-compile-current-file (file-name-nondirectory filename))
+  (let ((byte-compile-current-file filename)
 	target-file input-buffer output-buffer)
     (save-excursion
       (setq input-buffer (get-buffer-create " *Compiler Input*"))