meissa/c4k-forgejo
6
0
Fork 0
Code Issues Pull requests Projects Releases 27 Packages Wiki Activity

Added volume-total-storage-size to browser.cljs

Browse source
This commit is contained in:
Clemens Geibel 2022-08-12 10:59:40 +02:00
parent 44189d5f0c
commit cb94861bd0
1 changed files with 10 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
src/main/cljs/dda/c4k_gitea/browser.cljs
View file

@ -40,6 +40,7 @@
(generate-group (generate-group
"provider" "provider"
(cm/concat-vec (cm/concat-vec
(br/generate-input-field "volume-total-storage-size" "Your gitea volume-total-storage-size:" "20")
(br/generate-input-field "postgres-data-volume-path" "(Optional) Your postgres-data-volume-path if Persistent Volumes are not generated by an Operator:" ""))) (br/generate-input-field "postgres-data-volume-path" "(Optional) Your postgres-data-volume-path if Persistent Volumes are not generated by an Operator:" "")))
(generate-group (generate-group
"credentials" "credentials"
@ -67,7 +68,12 @@
app-name (br/get-content-from-element "app-name" :optional true) app-name (br/get-content-from-element "app-name" :optional true)
domain-whitelist (br/get-content-from-element "domain-whitelist" :optional true)] domain-whitelist (br/get-content-from-element "domain-whitelist" :optional true)]
(merge (merge
{:fqdn (br/get-content-from-element "fqdn")} {:fqdn (br/get-content-from-element "fqdn")
;:mailer-from (br/get-content-from-element "mailer-from")
;:mailer-host-port (br/get-content-from-element "mailer-host-port")
;:service-noreply-address (br/get-content-from-element "service-noreply-address")
;:volume-total-storage-size (br/get-content-from-element "volume-total-storage-size" :deserializer #(read-string %))} ; TODO: Do not use read-string!
}
(when (not (st/blank? postgres-data-volume-path)) (when (not (st/blank? postgres-data-volume-path))
{:postgres-data-volume-path postgres-data-volume-path}) {:postgres-data-volume-path postgres-data-volume-path})
(when (not (st/blank? issuer)) (when (not (st/blank? issuer))
@ -87,6 +93,7 @@
(br/validate! "app-name" ::gitea/default-app-name :optional true) (br/validate! "app-name" ::gitea/default-app-name :optional true)
(br/validate! "domain-whitelist" ::gitea/service-domain-whitelist :optional true) (br/validate! "domain-whitelist" ::gitea/service-domain-whitelist :optional true)
(br/validate! "postgres-data-volume-path" ::pgc/postgres-data-volume-path :optional true) (br/validate! "postgres-data-volume-path" ::pgc/postgres-data-volume-path :optional true)
(br/validate! "volume-total-storage-size" ::gitea/volume-total-storage-size)
(br/validate! "auth" gitea/auth? :deserializer edn/read-string) (br/validate! "auth" gitea/auth? :deserializer edn/read-string)
(br/set-form-validated!)) (br/set-form-validated!))
@ -114,5 +121,6 @@
(add-validate-listener "app-name") (add-validate-listener "app-name")
(add-validate-listener "domain-whitelist") (add-validate-listener "domain-whitelist")
(add-validate-listener "postgres-data-volume-path") (add-validate-listener "postgres-data-volume-path")
(add-validate-listener "volume-total-storage-size")
(add-validate-listener "issuer") (add-validate-listener "issuer")
(add-validate-listener "auth")) (add-validate-listener "auth"))