Refactor keywords to strings

Because the yaml reader reads clojure keywords as string.
pull/1/head
erik 1 year ago
parent 4533a8dfff
commit 64298cc69e

@ -24,7 +24,7 @@
(defn stage?
[input]
(contains? #{:prod :acc :int :test :dev} input))
(contains? #{"prod" "acc" "int" "test" "dev"} input))
(defn map-or-seq?
[input]
@ -33,7 +33,7 @@
(defn pvc-storage-class-name?
[input]
(contains? #{:manual :local-path} input))
(contains? #{"manual" "local-path"} input))
(defn port-number?
[input]

@ -34,9 +34,9 @@
(is (false? (cut/map-or-seq? "1,2,3"))))
(deftest test-pvc-storage-class-name?
(is (true? (cut/pvc-storage-class-name? :manual)))
(is (true? (cut/pvc-storage-class-name? :local-path)))
(is (false? (cut/pvc-storage-class-name? :none))))
(is (true? (cut/pvc-storage-class-name? "manual")))
(is (true? (cut/pvc-storage-class-name? "local-path")))
(is (false? (cut/pvc-storage-class-name? "none"))))
(deftest test-port-number?
(is (true? (cut/port-number? 1)))

Loading…
Cancel
Save