Resolve TODO for volume-total-storage-size schema

This commit is contained in:
Clemens Geibel 2022-08-05 12:05:24 +02:00
parent 42f6542b49
commit 992d226216
3 changed files with 4 additions and 7 deletions

View file

@ -5,7 +5,7 @@
:url "https://www.apache.org/licenses/LICENSE-2.0.html"} :url "https://www.apache.org/licenses/LICENSE-2.0.html"}
:dependencies [[org.clojure/clojure "1.10.3"] :dependencies [[org.clojure/clojure "1.10.3"]
[org.clojure/tools.reader "1.3.6"] [org.clojure/tools.reader "1.3.6"]
[org.domaindrivenarchitecture/c4k-common-clj "3.0.0"] [org.domaindrivenarchitecture/c4k-common-clj "3.0.1"]
[hickory "0.7.1"]] [hickory "0.7.1"]]
:target-path "target/%s/" :target-path "target/%s/"
:source-paths ["src/main/cljc" :source-paths ["src/main/cljc"

View file

@ -21,7 +21,7 @@
(s/def ::mailer-user pred/bash-env-string?) (s/def ::mailer-user pred/bash-env-string?)
(s/def ::mailer-pw pred/bash-env-string?) (s/def ::mailer-pw pred/bash-env-string?)
(s/def ::issuer pred/letsencrypt-issuer?) (s/def ::issuer pred/letsencrypt-issuer?)
(s/def ::volume-total-storage-size int?) ;TODO extend this for checking lower size limits (s/def ::volume-total-storage-size (partial pred/int-gt-n? 5))
(def config-defaults {:issuer "staging"}) (def config-defaults {:issuer "staging"})
@ -47,10 +47,7 @@
(defn data-storage-by-volume-size (defn data-storage-by-volume-size
[total root] [total root]
(cond (- total root))
(and (<= total 20) (> total 5)) (- total root)
(and (<= total 100) (> total 20)) (- total root)
(> total 100) (- total root)))
#?(:cljs #?(:cljs

View file

@ -38,7 +38,7 @@ data:
GITEA__mailer__ENABLED: "true" GITEA__mailer__ENABLED: "true"
GITEA__mailer__FROM: FROM GITEA__mailer__FROM: FROM
GITEA__mailer__MAILER_TYPE: smtp+startls GITEA__mailer__MAILER_TYPE: smtp+startls
# TODO: jem 2022-08-02: outdated, use SMTP_ADDR & SMTP_PORT instead # TODO: jem 2022-08-02: outdated with v1.18, use SMTP_ADDR & SMTP_PORT instead
GITEA__mailer__HOST: HOSTANDPORT GITEA__mailer__HOST: HOSTANDPORT
#[oauth2] #[oauth2]