19 lines
470 B
Clojure
19 lines
470 B
Clojure
|
(ns check.without-test
|
||
|
|
(: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)))
|