changeset 14412:75222e07921e

(byte-compile-log-1): Delete format call inside message.
author Karl Heuer <kwzh@gnu.org>
date Mon, 29 Jan 1996 21:09:23 +0000
parents bac274f178b0
children 77ed54321a41
files lisp/emacs-lisp/bytecomp.el
diffstat 1 files changed, 8 insertions(+), 8 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emacs-lisp/bytecomp.el	Mon Jan 29 19:28:11 1996 +0000
+++ b/lisp/emacs-lisp/bytecomp.el	Mon Jan 29 21:09:23 1996 +0000
@@ -749,14 +749,14 @@
 		 (and byte-compile-last-warned-form
 		      (not (eq byte-compile-current-form
 			       byte-compile-last-warned-form))))
-	     (message (format "While compiling %s%s:"
-			(or byte-compile-current-form "toplevel forms")
-			(if byte-compile-current-file
-			    (if (stringp byte-compile-current-file)
-				(concat " in file " byte-compile-current-file)
-			      (concat " in buffer "
-				      (buffer-name byte-compile-current-file)))
-			    ""))))
+	     (message "While compiling %s%s:"
+		      (or byte-compile-current-form "toplevel forms")
+		      (if byte-compile-current-file
+			  (if (stringp byte-compile-current-file)
+			      (concat " in file " byte-compile-current-file)
+			    (concat " in buffer "
+				    (buffer-name byte-compile-current-file)))
+			"")))
 	 (message "  %s" string))
 	(t
 	 (save-excursion