mirror of
https://github.com/jtdaugherty/brick.git
synced 2024-09-11 23:57:22 +03:00
CustomKeybindingDemo: UI nit
This commit is contained in:
parent
8f2716ab2a
commit
b8735a16bc
@ -103,7 +103,7 @@ drawUi st = [body]
|
||||
keybindingHelp = K.keybindingHelpWidget (st^.keyConfig) handlers
|
||||
status = hLimit 40 $
|
||||
padRight Max $
|
||||
vBox [ txt $ "Last key: " <> K.ppMaybeBinding binding
|
||||
vBox [ txt $ "Last key: " <> maybe "(none)" K.ppBinding binding
|
||||
, str $ "Last key handled: " <> show (st^.lastKeyHandled)
|
||||
, str $ "Counter: " <> show (st^.counter)
|
||||
]
|
||||
|
Loading…
Reference in New Issue
Block a user