increase subscription lease to 1 (simulated) day for achieving higher subscriber numbers

2020-09-16 16:07:39 +02:00 · 2020-09-16 16:07:39 +02:00 · 556b69d887
parent f5de7601bb
commit 556b69d887
1 changed files with 1 additions and 1 deletions
--- a/app/Main.hs
+++ b/app/Main.hs
@ -69,7 +69,7 @@ readConfig = do
          , confRequestRetries = 3
          }
        sConf = ServiceConf
-          { confSubscriptionExpiryTime = 12*3600 / fromIntegral speedup
+          { confSubscriptionExpiryTime = 24*3600 / fromIntegral speedup
          , confServicePort = read servicePortString
          , confServiceHost = confDomainString
          , confLogfilePath = "../simulationData/logs/" <> confDomainString <> ".log"