aboutsummaryrefslogtreecommitdiff
path: root/src/Config.hs
diff options
context:
space:
mode:
authormetamuffin <metamuffin@disroot.org>2023-10-15 11:09:15 +0200
committermetamuffin <metamuffin@disroot.org>2023-10-15 11:09:15 +0200
commitc2f56de490704e3fd6e5d2633e03dab20cce33ff (patch)
treecaa6873ccb91388bb50e9bbbd189cfa642072830 /src/Config.hs
parenta07a29ef8f22a96b12f9777fc34c2554e6c201ab (diff)
downloadfastbangs-c2f56de490704e3fd6e5d2633e03dab20cce33ff.tar
fastbangs-c2f56de490704e3fd6e5d2633e03dab20cce33ff.tar.bz2
fastbangs-c2f56de490704e3fd6e5d2633e03dab20cce33ff.tar.zst
customizable database path
Diffstat (limited to 'src/Config.hs')
-rw-r--r--src/Config.hs2
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")