diff --git a/test/check/parts_test.clj b/test/check/parts_test.clj new file mode 100644 index 0000000..c2f1d1a --- /dev/null +++ b/test/check/parts_test.clj @@ -0,0 +1,17 @@ +(ns check.parts-test + (:require [mount :refer [defstate] :as m] + [app.nyse :refer [conn]] + [clojure.test :refer :all])) + +(defstate should-not-start :start (throw (RuntimeException. "should not have been started!"))) + +(defn with-parts [f] + (m/start #'app.config/app-config #'app.nyse/conn) + (f) + (m/stop #'app.config/app-config #'app.nyse/conn)) + +(use-fixtures :each with-parts) + +(deftest start-only-parts + (is (instance? datomic.peer.LocalConnection conn)) + (is (instance? mount.NotStartedState should-not-start)))