added last todos

This commit is contained in:
jem 2019-12-16 15:18:53 +01:00
parent 1cd962375c
commit 1b025378ee

View file

@ -87,6 +87,7 @@
)))
result)))
; TODO: Add files to keep
(s/defn delete-resource-recursive!
[path :- s/Str]
(let [resource-paths
@ -95,6 +96,7 @@
(doseq [resource-path resource-paths]
(io/delete-file (str path resource-path)))))
; TODO: add ignore patterns filtering
(defn copy-resources!
[fs-prefix ;:- s/Str
base-path ;:- s/Str