Add to the load-path before the :preface

Fixes https://github.com/jwiegley/use-package/issues/172
This commit is contained in:
John Wiegley 2015-03-16 12:19:14 -05:00
parent 9e35dd95d9
commit db69a3f81c

View file

@ -441,12 +441,13 @@ possible."
;; Return the main body of the macro ;; Return the main body of the macro
(use-package-cat-maybes (use-package-cat-maybes
(list (plist-get args :preface))
;; Setup the load-path ;; Setup the load-path
(mapcar #'(lambda (path) `(add-to-list 'load-path ,path)) (mapcar #'(lambda (path)
`(eval-and-compile (add-to-list 'load-path ,path)))
(plist-get args :load-path)) (plist-get args :load-path))
(list (plist-get args :preface))
;; Setup any required autoloads ;; Setup any required autoloads
(if defer-loading (if defer-loading
(delete nil (delete nil