masscollaborationlabs/emacs
2
0
Fork 0
mirror of https://github.com/masscollaborationlabs/emacs.git synced 2025-07-04 19:29:37 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Have loading timer include time to require

Browse source
This commit is contained in:
John Wiegley 2012-06-17 05:12:13 -05:00
parent bf6c23044b
commit 4bd492f606
1 changed files with 9 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -305,15 +305,15 @@
t))
`(if (and ,(or predicate t)
,requires-test)
(if ,(if (stringp name)
`(load ,name t)
`(require ',name nil t))
(with-elapsed-timer
,(format "Loading package %s" name-string)
,init-body
,config-body
t)
(message "Could not load package %s" ,name-string))))))))
(with-elapsed-timer
,(format "Loading package %s" name-string)
(if (not ,(if (stringp name)
`(load ,name t)
`(require ',name nil t)))
(message "Could not load package %s" ,name-string)
,init-body
,config-body
t))))))))
(put 'use-package 'lisp-indent-function 1)