aboutsummaryrefslogtreecommitdiff
path: root/src/server/Conf.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/server/Conf.hs')
-rw-r--r--src/server/Conf.hs4
1 files changed, 3 insertions, 1 deletions
diff --git a/src/server/Conf.hs b/src/server/Conf.hs
index f66eb5e..2269cf2 100644
--- a/src/server/Conf.hs
+++ b/src/server/Conf.hs
@@ -13,6 +13,7 @@ data Conf = Conf
, port :: Int
, signInExpirationMn :: Int
, currency :: Text
+ , noReplyMail :: Text
} deriving (Read, Eq, Show)
getConf :: FilePath -> IO (Either Text Conf)
@@ -23,5 +24,6 @@ getConf path =
Conf.lookup "hostname" conf <*>
Conf.lookup "port" conf <*>
Conf.lookup "signInExpirationMn" conf <*>
- Conf.lookup "currency" conf
+ Conf.lookup "currency" conf <*>
+ Conf.lookup "noReplyMail" conf
)