made all config params start lower case

This commit is contained in:
Dennis Frieberg 2022-01-04 23:44:06 +01:00
parent 5dfca68212
commit 9a3183d239
2 changed files with 6 additions and 6 deletions

View file

@ -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"