diff options
Diffstat (limited to 'src/Config.hs')
| -rw-r--r-- | src/Config.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/Config.hs b/src/Config.hs index 6ffb1fd..12fc09d 100644 --- a/src/Config.hs +++ b/src/Config.hs @@ -28,6 +28,7 @@ data Config = Config { confHost :: HostPreference, confBaseUrl :: Text, confFavicon :: Text, + confDbPath :: Text, confUser :: Text, confPwHash :: Text, confEmailCmd :: Maybe FilePath, @@ -45,6 +46,7 @@ getConfig = do <*> resolveVal (lookup "bind-addr" confFile) "BIND_ADDR" "*6" <*> resolveVal (lookup "base-url" confFile) "BASE_URL" "http://localhost:20546" <*> resolveVal (lookup "favicon-url" confFile) "FAVICON_URL" "" + <*> resolveVal (lookup "db-path" confFile) "DB_PATH" "banger.db" <*> resolveVal (lookup "admin-user" confFile) "ADMIN_USER" "bleb" <*> resolveVal (lookup "admin-pw-hash" confFile) "ADMIN_PW_HASH" "" -- prevent login without manual pw <*> fmap (<|> lookup "email-command" confFile) (lookupEnv "EMAIL_CMD") |