mirror of
https://github.com/jtdaugherty/brick.git
synced 2024-09-11 23:57:22 +03:00
CustomKeybindingDemo: comment
This commit is contained in:
parent
1807e6d8d9
commit
5996440eb3
@ -71,7 +71,8 @@ handlers =
|
||||
appEvent :: T.BrickEvent () e -> T.EventM () St ()
|
||||
appEvent (T.VtyEvent (V.EvKey k mods)) = do
|
||||
-- Dispatch the key to the event handler to which the key is mapped,
|
||||
-- if any.
|
||||
-- if any. Also record in lastKeyHandled whether the dispatcher
|
||||
-- found a matching handler.
|
||||
kc <- use keyConfig
|
||||
let d = K.keyDispatcher kc handlers
|
||||
lastKey .= Just (k, mods)
|
||||
|
Loading…
Reference in New Issue
Block a user