8 lines
547 B
OCaml
8 lines
547 B
OCaml
let configuration () =
|
|
let conf = Otoml.Parser.from_file "/etc/lanonna.toml" in
|
|
let mq_url = Otoml.find conf Otoml.get_string ["pam"; "mq_url"] in
|
|
let mq_user = Otoml.find conf Otoml.get_string ["pam"; "mq_user"] in
|
|
let mq_password = Otoml.find conf Otoml.get_string ["pam"; "mq_password"] in
|
|
let base64_creds = Otoml.find conf Otoml.get_string ["pam"; "forgejo_base64"] in
|
|
(* config_file {mq_url = mq_url; mq_user = mq_user; mq_password = mq_password; base64_creds = base64_creds} *)
|
|
(mq_url, mq_user, mq_password, base64_creds)
|