Output Compiling message only if verbose is enabled

This commit is contained in:
John Wiegley 2015-03-16 02:48:55 -05:00
parent b75c1cb47e
commit 4029030eb5

View file

@ -521,7 +521,8 @@ this file. Usage:
(plist-get args* :defines)) (plist-get args* :defines))
(with-demoted-errors (with-demoted-errors
,(format "Error in %s: %%S" name-string) ,(format "Error in %s: %%S" name-string)
(message "Compiling package %s" ,name-string) (if use-package-verbose
(message "Compiling package %s" ,name-string))
(require ',name-symbol nil t)))))) (require ',name-symbol nil t))))))
(body* (body*