Using :load-path without also using :ensure now implies :ensure nil

Fixes https://github.com/jwiegley/use-package/issues/190

diff --git a/etc/USE-PACKAGE-NEWS b/etc/USE-PACKAGE-NEWS
index a4f20070e6a7dbe627731977d2c7283da1ad3dd3..b0265fa551582e3ca66ff4f85dabe560539a3e82 100644 (file)
--- a/etc/USE-PACKAGE-NEWS
+++ b/etc/USE-PACKAGE-NEWS
@@ -27,6 +27,7 @@
 - Support multiple symbols passed to `:after`, and a mini-DSL using `:all` and
   `:any`.
 - `:mode` and `:interpreter` can now accept `(rx ...)` forms.
+- Using `:load-path` without also using `:ensure` now implies `:ensure nil`.
 - `:bind (:map foo-map ...)` now defers binding in the map until the package
   has been loaded.
 - Print key bindings for keymaps in `describe-personal-keybindings`.

diff --git a/lisp/use-package/use-package.el b/lisp/use-package/use-package.el
index 5eb2b23936d5d533edaf188189dbc4ea1133fc46..b07f205adc7c7e4827225ab917751d44c4271db2 100644 (file)
--- a/lisp/use-package/use-package.el
+++ b/lisp/use-package/use-package.el
@@ -1764,6 +1764,9 @@ this file.  Usage:
                                       (not (memq :defer args)))
                                  (append args '(:demand t))
                                args)))
+                  (when (and (plist-member args* :load-path)
+                             (not (plist-member args* :ensure)))
+                    (plist-put args* :ensure nil))
                   (unless (plist-member args* :init)
                     (plist-put args* :init nil))
                   (unless (plist-member args* :config)