From e307c14c6f011a7c0c7f150b55bb16db12cbcef4 Mon Sep 17 00:00:00 2001
From: Keagan McClelland <keagan.mcclelland@gmail.com>
Date: Tue, 4 Aug 2020 18:52:08 -0600
Subject: [PATCH] removes unnecessary webserver kill

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

diff --git a/src/Application.hs b/src/Application.hs
index c345b28..17c3008 100644
--- a/src/Application.hs
+++ b/src/Application.hs
@@ -173,9 +173,7 @@ appMain = do
         useEnv
 
     -- Generate the foundation from the settings
-    makeFoundation settings >>= \f -> do
-        forkIO $ restartWeb f
-        startApp f
+    makeFoundation settings >>= startApp
 
 startApp :: RegistryCtx -> IO ()
 startApp foundation = do