jlamothe/hamming
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

display hamming widget

This commit is contained in:
Jonathan Lamothe 2024-07-19 21:01:33 -04:00
parent ef23b67688
commit 1565c1fe99
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/Hamming/App.hs
View File

@ -30,9 +30,9 @@ import Brick.AttrMap (forceAttrMap)
import Brick.Main (App (..), halt, neverShowCursor) import Brick.Main (App (..), halt, neverShowCursor)
import Brick.Types (BrickEvent, EventM, Widget) import Brick.Types (BrickEvent, EventM, Widget)
import Brick.Util (style) import Brick.Util (style)
import Brick.Widgets.Core (emptyWidget)
import Hamming.App.Types import Hamming.App.Types
import Hamming.App.Widgets
mainApp :: App AppState () ResName mainApp :: App AppState () ResName
mainApp = App mainApp = App
@ -44,7 +44,7 @@ mainApp = App
} }
drawFunc :: AppState -> [Widget ResName] drawFunc :: AppState -> [Widget ResName]
drawFunc = const [emptyWidget] drawFunc s = [hammingW s]
eventHandler eventHandler
:: BrickEvent ResName () :: BrickEvent ResName ()