mirror of
https://github.com/jtdaugherty/brick.git
synced 2024-11-22 05:36:00 +03:00
ProgressBarDemo: fix help string
This commit is contained in:
parent
32225d6c13
commit
ade3f9d20e
@ -71,7 +71,10 @@ drawUI p = [ui]
|
||||
(str "Y: " <+> cBar2) <=>
|
||||
(str "Z: " <+> cBar3) <=>
|
||||
str "" <=>
|
||||
strWrap "Hit 'x', 'y', or 'z' to advance progress, 't' to toggle labels, 'r' to revert values, 'cmd + r' to reset values or 'q' to quit"
|
||||
(strWrap $ concat [ "Hit 'x', 'y', or 'z' to advance progress,"
|
||||
, "'t' to toggle labels, 'r' to revert values, "
|
||||
, "'Ctrl + r' to reset values or 'q' to quit"
|
||||
])
|
||||
|
||||
appEvent :: T.BrickEvent () e -> T.EventM () (MyAppState ()) ()
|
||||
appEvent (T.VtyEvent e) =
|
||||
|
Loading…
Reference in New Issue
Block a user