centre hamming code
This commit is contained in:
parent
d0afc52c35
commit
f995da30b6
|
@ -27,11 +27,12 @@ License along with this program. If not, see
|
||||||
module Hamming.App.Draw (drawFunc) where
|
module Hamming.App.Draw (drawFunc) where
|
||||||
|
|
||||||
import Brick.Types (Widget)
|
import Brick.Types (Widget)
|
||||||
|
import Brick.Widgets.Center (center)
|
||||||
|
|
||||||
import Hamming.App.Types
|
import Hamming.App.Types
|
||||||
import Hamming.App.Widgets
|
import Hamming.App.Widgets
|
||||||
|
|
||||||
drawFunc :: AppState -> [Widget ResName]
|
drawFunc :: AppState -> [Widget ResName]
|
||||||
drawFunc s = [hammingW s]
|
drawFunc s = [center $ hammingW s]
|
||||||
|
|
||||||
--jl
|
--jl
|
||||||
|
|
Loading…
Reference in New Issue
Block a user