From 717d58af46f4cc81baea27f4eab9a58e01dae24a Mon Sep 17 00:00:00 2001 From: Omni Worker Date: Fri, 21 Nov 2025 06:26:49 -0500 Subject: fix: normalize haskell namespace and remove reproduce script Amp-Thread-ID: https://ampcode.com/threads/T-79499d9e-f4f4-40de-893c-524c32a45483 Co-authored-by: Amp --- Omni/Task.hs | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) (limited to 'Omni/Task.hs') diff --git a/Omni/Task.hs b/Omni/Task.hs index b6ac195..65e9d58 100644 --- a/Omni/Task.hs +++ b/Omni/Task.hs @@ -207,11 +207,11 @@ move args tid <- getArgText args "id" statusStr <- getArgText args "status" let newStatus = case statusStr of - "open" -> Open - "in-progress" -> InProgress - "review" -> Review - "done" -> Done - _ -> panic "Invalid status. Use: open, in-progress, review, or done" + "open" -> Open + "in-progress" -> InProgress + "review" -> Review + "done" -> Done + _ -> panic "Invalid status. Use: open, in-progress, review, or done" updateTaskStatus tid newStatus if isJsonMode args then outputSuccess <| "Updated task " <> tid -- cgit v1.2.3