diff options
Diffstat (limited to 'Omni/Task')
| -rw-r--r-- | Omni/Task/Core.hs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/Omni/Task/Core.hs b/Omni/Task/Core.hs index 699e4f3..6a6d1b8 100644 --- a/Omni/Task/Core.hs +++ b/Omni/Task/Core.hs @@ -1019,6 +1019,9 @@ showTaskDetailed t = do putText <| "Type: " <> T.pack (show (taskType t)) putText <| "Status: " <> T.pack (show (taskStatus t)) putText <| "Priority: " <> T.pack (show (taskPriority t)) <> priorityDesc + case taskComplexity t of + Nothing -> pure () + Just c -> putText ("Complexity: " <> T.pack (show c) <> "/5") when (taskType t == Epic) <| do let children = filter (maybe False (`matchesId` taskId t) <. taskParent) tasks |