From a5269a7fcf16d5bd9c4cd557ab933797bbdabff9 Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Tue, 18 Jun 2019 10:36:06 +0200 Subject: [PATCH] Tweak implementation of byte-compile-info-message * lisp/emacs-lisp/byte-run.el (byte-compile-info-message): Clean up implementation. --- lisp/emacs-lisp/byte-run.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/emacs-lisp/byte-run.el b/lisp/emacs-lisp/byte-run.el index 30a9f984793..96cff2ebeb2 100644 --- a/lisp/emacs-lisp/byte-run.el +++ b/lisp/emacs-lisp/byte-run.el @@ -542,7 +542,7 @@ Otherwise, return nil. For internal use only." (defun byte-compile-info-message (&rest args) "Message format ARGS in a way that looks pleasing in the compilation output." - (message "%s" (concat " INFO " (apply #'format args)))) + (message " %-9s%s" "INFO" (apply #'format args))) ;; I nuked this because it's not a good idea for users to think of using it. -- 2.39.2