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

Some minor code reformatting

Browse source
This commit is contained in:
John Wiegley 2015-03-15 02:21:53 -05:00
parent 71f894fe78
commit b4a00d2eb5
1 changed files with 8 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -292,13 +292,14 @@ then the expanded macros do their job silently."
(defsubst use-package-expand (name label form) (defsubst use-package-expand (name label form)
(declare (indent 1)) (declare (indent 1))
(and form (when form
(let ((err (make-symbol "err")) (let ((err (make-symbol "err"))
(fmt (format "Failure in %s of %s: %%S" label name))) (fmt (format "Failure in %s of %s: %%S" label name)))
`(condition-case-unless-debug ,err `(condition-case-unless-debug ,err
,form ,form
(error (display-warning 'use-package (format ,fmt ,err) :error) (error
nil))))) (ignore
(display-warning 'use-package (format ,fmt ,err) :error)))))))
(defun use--package (name-symbol name-string args) (defun use--package (name-symbol name-string args)
"See docstring for `use-package'." "See docstring for `use-package'."