diff options
| author | Ben Sima <ben@bsima.me> | 2025-11-20 23:10:37 -0500 |
|---|---|---|
| committer | Ben Sima <ben@bsima.me> | 2025-11-20 23:10:37 -0500 |
| commit | 5f4cbda3fe4ef38839d0b64068f0900bc3700ead (patch) | |
| tree | 319958cde00b50cb6387fed6146e0cdcadebed6a /Omni/Task | |
| parent | 6c84f9fe5d65b37127ccc08b81f46b1773c59500 (diff) | |
fix(task): exclude Review tasks from task ready
Diffstat (limited to 'Omni/Task')
| -rw-r--r-- | Omni/Task/Core.hs | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/Omni/Task/Core.hs b/Omni/Task/Core.hs index 228ab05..e4f1086 100644 --- a/Omni/Task/Core.hs +++ b/Omni/Task/Core.hs @@ -279,7 +279,9 @@ listTasks maybeType maybeParent maybeStatus maybeNamespace = do getReadyTasks :: IO [Task] getReadyTasks = do allTasks <- loadTasks - let openTasks = filter (\t -> taskStatus t /= Done) allTasks + -- Only Open or InProgress tasks are considered ready for work. + -- Review tasks are waiting for review, and Done tasks are complete. + let openTasks = filter (\t -> taskStatus t == Open || taskStatus t == InProgress) allTasks doneIds = map taskId <| filter (\t -> taskStatus t == Done) allTasks -- Find all tasks that act as parents |