blob: 58b83d9e0008836ebd8d9c20b614282c5756da30 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
(ns weepinbell.config-test
(:require [weepinbell.config :refer [load-config]]
[clojure.java.io :as io]
[clojure.test :refer [deftest testing is]]))
(deftest config-load-test
(testing "Config file merged with default config"
(let [external-config {:port 4000}
config-file "tmp/config.tmp.edn"]
(io/make-parents config-file)
(spit config-file external-config)
(let [config (load-config config-file)]
(is (= (:port config) (:port external-config)))
(is (= (:endpoint config) "/endpoint")))
(io/delete-file config-file))))
|
