2015-11-16 03:28:34 +00:00
|
|
|
(ns check.start-without-test
|
2015-11-15 19:40:34 +00:00
|
|
|
(:require [mount :as m]
|
|
|
|
|
[app.config :refer [app-config]]
|
|
|
|
|
[app.nyse :refer [conn]]
|
|
|
|
|
[app :refer [nrepl]]
|
|
|
|
|
[clojure.test :refer :all]))
|
|
|
|
|
|
|
|
|
|
(defn without [f]
|
|
|
|
|
(m/start-without #'app.nyse/conn #'app/nrepl)
|
|
|
|
|
(f)
|
|
|
|
|
(m/stop))
|
|
|
|
|
|
|
|
|
|
(use-fixtures :each without)
|
|
|
|
|
|
|
|
|
|
(deftest start-without-states
|
|
|
|
|
(is (map? app-config))
|
|
|
|
|
(is (instance? mount.NotStartedState nrepl))
|
|
|
|
|
(is (instance? mount.NotStartedState conn)))
|
