Недавно я начал работать над приложением Clojure для базы данных, и я пытаюсь получить некоторые модульные тесты на месте. В идеале я бы хотел избежать фактического попадания в реальную базу данных насмешливыми вещами.
Вот пример простого теста:
Тест-core.clj
(deftest core-test
(is (> (count (fn-under-test "foo")) 0)))
core.clj
(defn fn-under-test [slug]
(db/query "select * from %1" slug))
db.clj
(defn query [q & args]
(sql/with-connection db
(sql/with-query-results res
[(clause q args)]
(doall res))))
Мой вопрос: есть ли способ изнутри test-core.clj связать настраиваемую функцию с "db/query" таким образом, что core.clj будет использовать ее, в отличие от определения в db.clj?
Спасибо!