mount/test/check/parts_test.clj

(ns check.parts-test
  (:require [mount.core :as mount :refer [defstate] :as m]
            [app.nyse :refer [conn]]
            [clojure.test :refer :all]))

(defstate should-not-start :start (constantly 42))

(defn with-parts [f]
  (m/start #'app.config/app-config #'app.nyse/conn)
  (f)
  (m/stop))

(use-fixtures :each with-parts)

(deftest start-only-parts 
  (is (instance? datomic.peer.LocalConnection conn))
  (is (instance? mount.core.NotStartedState should-not-start)))