more verbose messages from engine on startup

2020-12-05 14:28:57 +01:00 · 2020-12-05 14:28:57 +01:00 · ccd8b7eeaf
commit ccd8b7eeaf
parent cd662da0b7
1 changed files with 2 additions and 1 deletions
--- a/src/Affection.hs
+++ b/src/Affection.hs
@ -99,9 +99,10 @@ withAffection AffectionConfig{..} = do
  (_, _) <- runStateT
    (A.runState
      (do
-        liftIO $ logIO Debug "Starting Loop"
+        liftIO $ logIO Debug "Running Pre-Loop stage"
        -- run preLoop function from Affectionate
        preLoop gameData
+        liftIO $ logIO Debug "Starting Loop"
        whileM_ (hasNextStep gameData)
          (do
            -- get state