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 14da50f..13d5981 100644
--- a/src/server/Conf.hs
+++ b/src/server/Conf.hs
@@ -15,6 +15,7 @@ data Conf = Conf
, signInExpiration :: NominalDiffTime
, currency :: Text
, noReplyMail :: Text
+ , https :: Bool
} deriving Show
getConf :: FilePath -> IO (Either Text Conf)
@@ -26,5 +27,6 @@ getConf path =
Conf.lookup "port" conf <*>
Conf.lookup "signInExpiration" conf <*>
Conf.lookup "currency" conf <*>
- Conf.lookup "noReplyMail" conf
+ Conf.lookup "noReplyMail" conf <*>
+ Conf.lookup "https" conf
)