add copy for user resources
This commit is contained in:
parent
1b025378ee
commit
404110092f
1 changed files with 6 additions and 0 deletions
|
@ -118,6 +118,12 @@
|
||||||
(when (.isFile source-file)
|
(when (.isFile source-file)
|
||||||
(io/copy source-file target-file)))))))
|
(io/copy source-file target-file)))))))
|
||||||
|
|
||||||
|
(defn copy-resources-from-user!
|
||||||
|
[fs-prefix resources target-path ignore-patterns]
|
||||||
|
(let [resource-path "templates"]
|
||||||
|
(copy-resources! fs-prefix resource-path resources
|
||||||
|
target-path ignore-patterns)))
|
||||||
|
|
||||||
(defn copy-resources-from-theme!
|
(defn copy-resources-from-theme!
|
||||||
[fs-prefix theme target-path ignore-patterns]
|
[fs-prefix theme target-path ignore-patterns]
|
||||||
(let [theme-path (str "templates/themes/" theme)]
|
(let [theme-path (str "templates/themes/" theme)]
|
||||||
|
|
Loading…
Reference in a new issue