Merge pull request #13 from PhilHudson/macroexpand

Macroexpand quoted eval-after-load block early
jwiegley · Jan 24, 2013 · 7b2ce57 · 7b2ce57
2 parents a71670c + 1106efe
commit 7b2ce57
Showing 1 changed file with 6 additions and 4 deletions.
diff --git a/use-package.el b/use-package.el
@@ -499,10 +499,12 @@ For full documentation. please see commentary.
                    ,init-body
                    ,(unless (null config-body)
                       `(eval-after-load ,name-string
-                         '(if ,requires-test
-                              (with-elapsed-timer
-                                  ,(format "Configuring package %s" name-string)
-                                ,config-body))))
+                         (quote
+                           (if ,requires-test
+                               ,(macroexpand-all
+                                  `(with-elapsed-timer
+                                       ,(format "Configuring package %s" name-string)
+                                     ,config-body))))))
                    t))
             `(if (and ,(or predicate t)
                       ,requires-test)