jtdaugherty/brick
1
1
Fork 0
mirror of https://github.com/jtdaugherty/brick.git synced 2024-09-11 23:57:22 +03:00
Code Issues Projects Releases Wiki Activity

CustomKeybindingDemo: comment

Browse Source
This commit is contained in:
Jonathan Daugherty 2022-08-02 19:44:05 -07:00
parent 1807e6d8d9
commit 5996440eb3
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
programs/CustomKeybindingDemo.hs
View File

@ -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)