From b3b9b18340f26c9ffa3130483af5bef943ef0db7 Mon Sep 17 00:00:00 2001
From: adreasnow <adrea.snow@gmail.com>
Date: Wed, 6 May 2026 14:21:29 +1000
Subject: [PATCH] cancel-in-progress hsould allow text input

---
 src/Language/Github/Actions/Concurrency.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Language/Github/Actions/Concurrency.hs b/src/Language/Github/Actions/Concurrency.hs
index 073e79d..bdcdd51 100644
--- a/src/Language/Github/Actions/Concurrency.hs
+++ b/src/Language/Github/Actions/Concurrency.hs
@@ -57,7 +57,7 @@ data Concurrency = Concurrency
   { -- | Concurrency group identifier
     group :: Maybe Text,
     -- | Whether to cancel in-progress runs
-    cancelInProgress :: Maybe Bool
+    cancelInProgress :: Maybe Text
   }
   deriving stock (Eq, Generic, Ord, Show)