jtdaugherty/brick
1
1
Fork 0
mirror of https://github.com/jtdaugherty/brick.git synced 2024-12-01 17:32:52 +03:00
Code Issues Projects Releases Wiki Activity

Add edit keybinding

Browse Source
This commit is contained in:
Jonathan Daugherty 2015-05-09 14:06:24 -07:00
parent 7f671c394a
commit 6caf896a0f
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
src/Brick.hs
View File

@ -89,6 +89,7 @@ editEvent e theEdit = f theEdit
f = case e of
EvKey (KChar 'a') [MCtrl] -> gotoBOL
EvKey (KChar 'e') [MCtrl] -> gotoEOL
EvKey (KChar 'd') [MCtrl] -> deleteChar
EvKey (KChar c) [] | c /= '\t' -> insertChar c
EvKey KDel [] -> deleteChar
EvKey KLeft [] -> moveLeft