Skip to content

Commit 246cab5

Browse files
committed
Merge branch 'master' of github.com:boot-clj/boot
2 parents 8f3e56b + 37fa9fb commit 246cab5

File tree

1 file changed

+7
-5
lines changed

1 file changed

+7
-5
lines changed

boot/core/src/boot/task_helpers.clj

Lines changed: 7 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -117,12 +117,14 @@
117117
(defmethod sift-action :move
118118
[_ _ args]
119119
(let [proc #(reduce-kv string/replace % args)
120-
reducer (fn [xs k v]
121-
(let [k (proc k)]
122-
(assoc xs k (assoc v :path k))))]
120+
mkreducer (fn [dir]
121+
(fn [xs k v]
122+
(let [k (proc k)]
123+
(assoc xs k (assoc v :path k :dir dir)))))]
123124
(fn [fileset]
124-
(->> (partial reduce-kv reducer {})
125-
(update-in fileset [:tree])))))
125+
(let [dir (#'core/get-add-dir fileset #{:resource})]
126+
(->> (partial reduce-kv (mkreducer dir) {})
127+
(update-in fileset [:tree]))))))
126128

127129
(defmethod sift-action :add-jar
128130
[v? _ args]

0 commit comments

Comments
 (0)