Display which package that has compile errors

This commit is contained in:
Thomas Frössman 2014-09-14 12:57:44 +02:00
parent 4cf50ffbca
commit 351c102010

View file

@ -401,10 +401,11 @@ For full documentation. please see commentary.
(eval-when-compile
(when (bound-and-true-p byte-compile-current-file)
,@defines-eval
(with-demoted-errors
,(if (stringp name)
`(load ,name t)
`(require ',name nil t)))))
(condition-case err
,(if (stringp name)
`(load ,name t)
`(require ',name nil t))
(error (message "Error compiling %s: %s" ',name err) nil))))
,(if (and (or commands (use-package-plist-get args :defer))
(not (use-package-plist-get args :demand)))