diff --git a/src/Swarm/TUI/Model/StateUpdate.hs b/src/Swarm/TUI/Model/StateUpdate.hs index 395bc1c59..5e4eb19e3 100644 --- a/src/Swarm/TUI/Model/StateUpdate.hs +++ b/src/Swarm/TUI/Model/StateUpdate.hs @@ -53,7 +53,7 @@ initAppState AppOpts {..} = do let isRunningInitialProgram = isJust scriptToRun || autoPlay skipMenu = isJust userScenario || isRunningInitialProgram || isJust userSeed gs <- initGameState - (warnings, ui) <- initUIState (not skipMenu) cheatMode + (warnings, ui) <- initUIState (not skipMenu) (cheatMode || autoPlay) let logWarning rs w = rs & eventLog %~ logEvent (ErrorTrace Error) ("UI Loading", -8) (prettyFailure w) let rs = List.foldl' logWarning initRuntimeState warnings case skipMenu of