From 64c35f3807548346d48c272cffcfc3c639b68e09 Mon Sep 17 00:00:00 2001
From: Keagan McClelland <keagan.mcclelland@gmail.com>
Date: Tue, 4 Aug 2020 17:44:06 -0600
Subject: [PATCH] friendly messaging

---
 src/Application.hs | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/Application.hs b/src/Application.hs
index 07f1929..c53fa1a 100644
--- a/src/Application.hs
+++ b/src/Application.hs
@@ -184,6 +184,7 @@ startApp foundation = do
     -- certbot renew loop
     void . forkIO $ forever $ flip runReaderT foundation $ do
         shouldRenew <- doesSslNeedRenew
+        putStrLn @Text $ "Checking if SSL Certs should be renewed: " <> show shouldRenew
         when shouldRenew $ do
             putStrLn @Text "Renewing SSL Certs."
             renewSslCerts