chore: reduce number of workers during testing

app/DevelMain.hs

@@ -67,7 +67,7 @@ update = do
     restartAppInNewThread tidStore = modifyStoredIORef tidStore $ \tid -> do
         killThread tid
         withStore doneStore takeMVar
-        readStore doneStore >>= start
+        withStore doneStore start
 
 
     -- | Start the server in a separate thread.
@@ -77,7 +77,7 @@ update = do
       (port, site, app) <- getApplicationRepl
       resourceForkIO $ do
         finally (liftIO $ runSettings (setPort port defaultSettings) app)
-          (liftIO $ shutdownApp site >> putMVar done ())
+          (liftIO $ shutdownApp site `finally` putMVar done ())
 
 -- | kill the server
 shutdown :: IO ()

config/test-settings.yml

@@ -8,3 +8,5 @@ log-settings:
   destination:   "test.log"
 
 auth-dummy-login: true
+
+job-workers: 1