test for init-project

This commit is contained in:
Chas Emerick 2012-04-23 22:15:39 -04:00
parent b1ae6b0758
commit 18d58964d5
2 changed files with 9 additions and 1 deletions

View file

@ -0,0 +1,3 @@
(defproject profile-middler "2.0.0-SNAPSHOT"
:description "Automate Clojure projects without setting your hair on fire."
:profiles {:middler {:middleware [leiningen.core.test.project/add-seven]}})

View file

@ -90,4 +90,9 @@
(assoc project :seven 7))
(deftest test-middleware
(is (= 7 (:seven (read (.getFile (io/resource "p2.clj")))))))
(is (= 7 (:seven (read (.getFile (io/resource "p2.clj")))))))
(deftest test-init-project
(is (= 7 (:seven (-> (.getFile (io/resource "p3.clj"))
read
(merge-profiles [:middler]))))))