diff --git a/src/Application.hs b/src/Application.hs
index ac27d77..0942761 100644
--- a/src/Application.hs
+++ b/src/Application.hs
@@ -176,7 +176,7 @@ startApp :: AgentCtx -> IO ()
 startApp foundation = do
     -- set up ssl certificates
     putStrLn @Text "Setting up SSL"
-    _ <- setupSsl <$> getAppSettings
+    _ <- setupSsl $ appSettings foundation
     putStrLn @Text "SSL Setup Complete"
     startWeb foundation