You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
22 lines
653 B
Clojure
22 lines
653 B
Clojure
(ns cryogen-core.classpath-able-io-test
|
|
(:require [clojure.test :refer :all]
|
|
[clojure.string :as s]
|
|
[clojure.java.io :as io]
|
|
[cryogen-core.classpath-able-io :as sut]))
|
|
|
|
(def theme "bootstrap4-test")
|
|
|
|
(def target "target/tmp")
|
|
|
|
(defn verify-file-exists [path]
|
|
(.exists (io/file path)))
|
|
|
|
(defn verify-dir-exists [path]
|
|
(and (verify-file-exists path)
|
|
(.isDirectory (io/file path))))
|
|
|
|
(deftest test-copy-resources-from-theme
|
|
(is (do
|
|
(sut/copy-resources-from-theme theme target)
|
|
(and (verify-dir-exists (str target "/js"))
|
|
(verify-file-exists (str target "/js/dummy.js")))))) |