Update postgres to use strings instead of keywords

In config and auth.
pull/1/head
erik 1 year ago
parent 64298cc69e
commit e827b6113d

@ -80,7 +80,7 @@
[config pg-config?] [config pg-config?]
(let [{:keys [pv-storage-size-gb pvc-storage-class-name] (let [{:keys [pv-storage-size-gb pvc-storage-class-name]
:or {pv-storage-size-gb 10 :or {pv-storage-size-gb 10
pvc-storage-class-name :manual}} config] pvc-storage-class-name "manual"}} config]
(-> (->
(yaml/from-string (yaml/load-resource "postgres/pvc.yaml")) (yaml/from-string (yaml/load-resource "postgres/pvc.yaml"))
(assoc-in [:spec :resources :requests :storage] (str pv-storage-size-gb "Gi")) (assoc-in [:spec :resources :requests :storage] (str pv-storage-size-gb "Gi"))

@ -84,14 +84,14 @@
:accessModes ["ReadWriteOnce"] :accessModes ["ReadWriteOnce"]
:resources {:requests {:storage "20Gi"}}}} :resources {:requests {:storage "20Gi"}}}}
(cut/generate-pvc {:pv-storage-size-gb 20 (cut/generate-pvc {:pv-storage-size-gb 20
:pvc-storage-class-name :local-path})))) :pvc-storage-class-name "local-path"}))))
(deftest should-generate-persistent-volume-claim-diff (deftest should-generate-persistent-volume-claim-diff
(is (= {:storageClassName-c1 "manual", :storageClassName-c2 "local-path", (is (= {:storageClassName-c1 "manual", :storageClassName-c2 "local-path",
:storage-c1 "10Gi", :storage-c2 "20Gi"} :storage-c1 "10Gi", :storage-c2 "20Gi"}
(ct/map-diff (cut/generate-pvc {}) (ct/map-diff (cut/generate-pvc {})
(cut/generate-pvc {:pv-storage-size-gb 20 (cut/generate-pvc {:pv-storage-size-gb 20
:pvc-storage-class-name :local-path}))))) :pvc-storage-class-name "local-path"})))))
(deftest should-generate-secret (deftest should-generate-secret
(is (= {:apiVersion "v1" (is (= {:apiVersion "v1"

Loading…
Cancel
Save