Update temporary width override

This matches the usual setup on my main development machine.
This commit is contained in:
George Thomas 2026-01-07 01:04:34 +00:00
parent f98a4c29d2
commit ffbdd8744e

View File

@ -22,7 +22,7 @@ import System.Console.Terminal.Size qualified as Terminal.Size
main :: IO () main :: IO ()
main = do main = do
-- terminalWidth <- Terminal.Size.width <<$>> Terminal.Size.size -- TODO this doesn't work in GHCID or GHCIWatch... -- terminalWidth <- Terminal.Size.width <<$>> Terminal.Size.size -- TODO this doesn't work in GHCID or GHCIWatch...
terminalWidth <- pure $ Just 60 terminalWidth <- pure $ Just 62
putStrLn $ drawTree $ show <$> getTestTree tests putStrLn $ drawTree $ show <$> getTestTree tests
TL.putStrLn . displayTestResultsConsole terminalWidth =<< runTests () tests TL.putStrLn . displayTestResultsConsole terminalWidth =<< runTests () tests