Skip to content

Instantly share code, notes, and snippets.

@mobileink
mobileink / gist:67cefbe1a3ed5f32d2ad
Created February 16, 2016 16:23
copy assets task
(core/deftask assets
"copy assets to build-dir"
[v verbose bool "Print trace messages"]
(core/with-pre-wrap [fs]
(let [tgt (core/tmp-dir!)
in-files (->> fs
core/output-files
(core/not-by-ext [".clj"])
(map (juxt core/tmp-path core/tmp-file)))]
(doseq [[rel-path in-file] in-files]
@mobileink
mobileink / gist:a2f86196eb67435e9623
Created February 12, 2016 14:45
simple boot file copying with filter and path alteration
(core/deftask webapp
"copy webapp to build"
[]
(println "TASK: webapp")
(comp
(builtin/sift :include #{#".*.clj$"}
:invert true)
(builtin/target :dir #{(output-webapp-dir)}
:no-clean true)))