diff --git a/app/Backend/Http.hs b/app/Backend/Http.hs index e99c8be..4b6f813 100644 --- a/app/Backend/Http.hs +++ b/app/Backend/Http.hs @@ -67,9 +67,9 @@ httpDefaultSettings = [httpDefaultSetting] httpConfigCodec :: TomlCodec HttpConfiguration httpConfigCodec = HttpConfiguration - <$> Toml.configM Toml.text "InstanceName" .= instanceName - <*> Toml.configM Toml.int "Port" .= port - <*> Toml.configM bindPreference "Bind" .= bindPref + <$> Toml.configM Toml.text "instanceName" .= instanceName + <*> Toml.configM Toml.int "port" .= port + <*> Toml.configM bindPreference "bind" .= bindPref httpConfigsCodec :: TomlCodec [HttpConfiguration] httpConfigsCodec = Toml.list httpConfigCodec "http" diff --git a/app/Backend/Https.hs b/app/Backend/Https.hs index 69afa1e..01f2181 100644 --- a/app/Backend/Https.hs +++ b/app/Backend/Https.hs @@ -55,9 +55,9 @@ httpsDefaultSettings = [httpsDefaultSetting] httpsConfigCodec' :: TomlCodec TLSConfiguration httpsConfigCodec' = TLSConfiguration - <$> Toml.configM Toml.string "Certificate" .= certFile - <*> Toml.configM (Toml.arrayOf Toml._String) "CertChain" .= certChain - <*> Toml.configM Toml.string "KeyFile" .= keyFile + <$> Toml.configM Toml.string "certificate" .= certFile + <*> Toml.configM (Toml.arrayOf Toml._String) "certChain" .= certChain + <*> Toml.configM Toml.string "keyFile" .= keyFile httpsConfigCodec :: TomlCodec HttpsConfiguration httpsConfigCodec = Toml.pair httpConfigCodec httpsConfigCodec'