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

Load tasks from file

Browse source
This commit is contained in:
Joscha 2018-09-11 20:03:17 +00:00
parent 8f1b2856dc
commit 5621746f37
5 changed files with 72 additions and 19 deletions
Download patch file Download diff file Expand all files Collapse all files

5
src/TaskMachine/UI.hs
View file

@ -7,7 +7,7 @@ module TaskMachine.UI where
import qualified Brick as B
import qualified Brick.AttrMap as B
import qualified Brick.Widgets.List as B
import qualified Data.Vector as V
import qualified Data.Vector as V
import qualified Graphics.Vty as VTY
import TaskMachine.TaskList
@ -52,6 +52,9 @@ data UIState = UIState
, invisibleTasks :: V.Vector LTask
}
startUIState :: V.Vector LTask -> UIState
startUIState = undefined
startState :: UIState
startState = UIState (B.list RTaskList V.empty 1) V.empty