Add a failing test for overlapped sourcepaths.
This commit is contained in:
parent
d6fdc21648
commit
82df67b959
4 changed files with 10 additions and 1 deletions
|
@ -24,6 +24,8 @@
|
||||||
|
|
||||||
(def native-project (read-test-project "native"))
|
(def native-project (read-test-project "native"))
|
||||||
|
|
||||||
|
(def overlapped-sourcepaths-project (read-test-project "overlapped-sourcepaths"))
|
||||||
|
|
||||||
;; grumble, grumble; why didn't this make it into clojure.java.io?
|
;; grumble, grumble; why didn't this make it into clojure.java.io?
|
||||||
(defn delete-file-recursively
|
(defn delete-file-recursively
|
||||||
"Delete file f. If it's a directory, recursively delete all its contents.
|
"Delete file f. If it's a directory, recursively delete all its contents.
|
||||||
|
|
|
@ -4,7 +4,8 @@
|
||||||
[leiningen.jar]
|
[leiningen.jar]
|
||||||
[leiningen.core.eval :only [platform-nullsink]]
|
[leiningen.core.eval :only [platform-nullsink]]
|
||||||
[leiningen.test.helper :only [tricky-name-project sample-failing-project
|
[leiningen.test.helper :only [tricky-name-project sample-failing-project
|
||||||
sample-no-aot-project sample-project]])
|
sample-no-aot-project sample-project
|
||||||
|
overlapped-sourcepaths-project]])
|
||||||
(:import [java.util.jar JarFile]))
|
(:import [java.util.jar JarFile]))
|
||||||
|
|
||||||
(def mock-project {:name "mock-project" :version "1.0"
|
(def mock-project {:name "mock-project" :version "1.0"
|
||||||
|
@ -69,3 +70,6 @@
|
||||||
(let [jar-file (jar (dissoc sample-project :dependencies :main))]
|
(let [jar-file (jar (dissoc sample-project :dependencies :main))]
|
||||||
(and (is (not (number? jar-file)))
|
(and (is (not (number? jar-file)))
|
||||||
(is (.exists (io/file jar-file))))))
|
(is (.exists (io/file jar-file))))))
|
||||||
|
|
||||||
|
(deftest overlapped-paths
|
||||||
|
(is (jar overlapped-sourcepaths-project)))
|
||||||
|
|
3
test_projects/overlapped-sourcepaths/project.clj
Normal file
3
test_projects/overlapped-sourcepaths/project.clj
Normal file
|
@ -0,0 +1,3 @@
|
||||||
|
(defproject overlapped-sourcepaths "0.1.0"
|
||||||
|
:dependencies [[org.clojure/clojure "1.3.0"]]
|
||||||
|
:java-source-paths ["src"])
|
0
test_projects/overlapped-sourcepaths/src/foo
Normal file
0
test_projects/overlapped-sourcepaths/src/foo
Normal file
Loading…
Reference in a new issue