Garmelon/task-machine
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Clean up files and order tasks

Browse source
This commit is contained in:
Joscha 2018-09-27 15:13:29 +00:00
parent 2a0b110e32
commit 5de27b195b
5 changed files with 34 additions and 12 deletions
Download patch file Download diff file Expand all files Collapse all files

6
src/TaskMachine/UI/Task.hs
View file

@ -55,9 +55,9 @@ renderSnippet s = B.str $ format
renderTask :: Task -> B.Widget n
renderTask t = B.hBox $ catMaybes
[ Just $ withSpace $ renderCompletion $ taskCompletion t
, (withSpace . renderPriority) <$> taskPriority t
, (withSpace . renderDue) <$> taskDue t
, (withSpace . renderCreated) <$> taskCreated t
, withSpace . renderPriority <$> taskPriority t
, withSpace . renderDue <$> taskDue t
, withSpace . renderCreated <$> taskCreated t
, Just $ renderDescription $ taskDescription t
]