test setup

This commit is contained in:
Keagan McClelland
2020-08-04 16:25:00 -06:00
parent c157a99b0a
commit c75c9fd250

View File

@@ -185,6 +185,7 @@ startApp foundation = do
void . forkIO $ forever $ do
putStrLn $ "DOMAIN: " <> registryHostname (appSettings foundation)
putStrLn $ "CERT: " <> sslCertLocation (appSettings foundation)
runReaderT (renewSslCerts (sslCertLocation $ appSettings foundation)) foundation
shouldRenew <- doesSslNeedRenew (sslCertLocation $ appSettings foundation)
when shouldRenew $ do
putStrLn @Text "Renewing SSL Certs."