From 90c5e2f0b2ffb28f8beff4b1142bcce9091f76e4 Mon Sep 17 00:00:00 2001
From: George Thomas <georgefsthomas@gmail.com>
Date: Tue, 2 Dec 2025 09:30:39 +0000
Subject: [PATCH] Force Tasty to use colours in GHCID

---
 app/Main.hs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/app/Main.hs b/app/Main.hs
index 8a7937a..8087bc9 100644
--- a/app/Main.hs
+++ b/app/Main.hs
@@ -11,13 +11,14 @@ import Data.Text.IO qualified as T
 import Data.Void
 import Test.Tasty
 import Test.Tasty.Golden (goldenVsString)
+import Test.Tasty.Ingredients.ConsoleReporter
 import Text.Megaparsec hiding (Pos)
 import Text.Megaparsec.Char
 import Text.Megaparsec.Char.Lexer qualified as Lex
 
 main :: IO ()
 main =
-    defaultMain $
+    defaultMain . localOption (Always :: UseColor) $
         testGroup
             "tests"
             [ puzzleTest puzzle1