From 01e4ce0fa7c369996ec4ef3a033d16d6fa0eb715 Mon Sep 17 00:00:00 2001
From: Joris
Date: Thu, 31 Mar 2016 18:45:36 +0200
Subject: Use https link and secure cookie when activated

---
 src/server/Conf.hs | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'src/server/Conf.hs')

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
   )
-- 
cgit v1.2.3