mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-06 06:20:55 -08:00
Code Issues Projects Releases Wiki Activity

Only printing debug messages if use-package-verbose is `debug'

Browse source 
Fixes https://github.com/jwiegley/use-package/issues/271
This commit is contained in:
John Wiegley 2016-02-26 16:14:51 -08:00
parent 8e128b29f5
commit f150691c78
1 changed files with 3 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/use-package/use-package.el
View file

@ -58,7 +58,8 @@ If you customize this, then you should require the `use-package'
feature in files that use `use-package', even if these files only
contain compiled expansions of the macros. If you don't do so,
then the expanded macros do their job silently."
:type 'boolean
:type '(choice (const :tag "Quiet" nil) (const :tag "Verbose" t)
(const :tag "Debug" debug))
:group 'use-package)
(defcustom use-package-debug nil
@ -1136,7 +1137,7 @@ this file. Usage:
(plist-get args* :defines))
(with-demoted-errors
,(format "Cannot load %s: %%S" name)
,(if use-package-verbose
,(if (eq use-package-verbose 'debug)
`(message "Compiling package %s" ',name-symbol))
,(unless (plist-get args* :no-require)
(use-package-load-name name)))))))