diff options
| author | Sylvain Benner <sylvain.benner@gmail.com> | 2015-05-19 21:07:30 -0400 |
|---|---|---|
| committer | Sylvain Benner <sylvain.benner@gmail.com> | 2015-05-19 21:07:30 -0400 |
| commit | 90e3f4811144c0dcef05162892e8117e9577bb12 (patch) | |
| tree | fc7a35fa7510506ec57264f7314fa98808a82e93 /lisp/use-package/use-package.el | |
| parent | f1a00054b13f77f9d8f7c58de7978ff3b6d4b683 (diff) | |
| download | emacs-90e3f4811144c0dcef05162892e8117e9577bb12.tar.gz emacs-90e3f4811144c0dcef05162892e8117e9577bb12.tar.bz2 emacs-90e3f4811144c0dcef05162892e8117e9577bb12.zip | |
Fix calls to run-hooks for :init and :config injected hooks
Diffstat (limited to 'lisp/use-package/use-package.el')
| -rw-r--r-- | lisp/use-package/use-package.el | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/lisp/use-package/use-package.el b/lisp/use-package/use-package.el index 6feb0d84a5c..444a48ca511 100644 --- a/lisp/use-package/use-package.el +++ b/lisp/use-package/use-package.el @@ -181,16 +181,16 @@ ARGS is a list of forms, so `((foo))' if only `foo' is being called." (when body `((when ,(macroexp-progn (use-package-expand name-string (format "pre-%s hook" keyword) - `(run-hook-with-args-until-failure - ',(intern (concat "use-package--" name-string - "--pre-" keyword-name "-hook"))))) + `((run-hook-with-args-until-failure + ',(intern (concat "use-package--" name-string + "--pre-" keyword-name "-hook")))))) ,(macroexp-progn (use-package-expand name-string (format "%s" keyword) body)) ,(macroexp-progn (use-package-expand name-string (format "post-%s hook" keyword) - `(run-hooks - ',(intern (concat "use-package--" name-string - "--post-" keyword-name "-hook"))))))))))) + `((run-hooks + ',(intern (concat "use-package--" name-string + "--post-" keyword-name "-hook")))))))))))) (defun use-package--with-elapsed-timer (text body) "BODY is a list of forms, so `((foo))' if only `foo' is being called." |