[elpa] externals/setup 1fba467 2/2: Evaluate path one in :load-from

[ELPA Syncer]

branch: externals/setup
commit 1fba4674ac496a6e2fc2cf5f7936c2240320450d
Author: Philip Kaludercic <philipk@posteo.net>
Commit: Philip Kaludercic <philipk@posteo.net>

    Evaluate path one in :load-from
---
 setup.el | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/setup.el b/setup.el
index b2ac450..51aecf6 100644
--- a/setup.el
+++ b/setup.el
@@ -586,9 +586,10 @@ the first PACKAGE."
 
 (setup-define :load-from
   (lambda (path)
-    `(if (file-exists-p ,path)
-         (add-to-list 'load-path (expand-file-name ,path))
-       ,(setup-quit)))
+    `(let ((path* (expand-file-name ,path)))
+       (if (file-exists-p path*)
+           (add-to-list 'load-path path*)
+         ,(setup-quit))))
   :documentation "Add PATH to load path.
 This macro can be used as NAME, and it will replace itself with
 the nondirectory part of PATH.