From 3300dce8aeadafbc08155b53410d3d686315322e Mon Sep 17 00:00:00 2001 From: jem Date: Wed, 11 Dec 2019 18:04:48 +0100 Subject: [PATCH] "Mob Session DONE [ci-skip]" --- src/cryogen_core/classpath_able_io.clj | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/src/cryogen_core/classpath_able_io.clj b/src/cryogen_core/classpath_able_io.clj index da1ea7a..d94f963 100644 --- a/src/cryogen_core/classpath_able_io.clj +++ b/src/cryogen_core/classpath_able_io.clj @@ -14,6 +14,8 @@ [ignore-patterns source-list] (filter #(not (re-matches ignore-patterns %)) source-list)) +;; TODO: make fct wipe-folders + (defn file-from-cp [resource-path] (let [file-from-cp (io/file (io/resource resource-path))] @@ -49,7 +51,7 @@ source-file (io/file source-dir f)] (if (.isFile source-file) (do - (println source-file) + ;; TODO: Move the following to a new copy-file function (io/make-parents target-file) (io/copy f target-file) ;; continue copying files @@ -69,6 +71,7 @@ (copy-dir source-file target-file ignore-patterns) :else nil + ;; TODO: Call copy-file fct. - take care on parameter. ;(fs/copy src target) )))