# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 822949763 0
# Node ID 75222e07921e6c81b7f0861ffc4272b6666503e1
# Parent  bac274f178b00d30543084dce49d14e6bcf8d822
(byte-compile-log-1): Delete format call inside message.

diff -r bac274f178b0 -r 75222e07921e lisp/emacs-lisp/bytecomp.el
--- 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