diff options
| author | tv <tv@krebsco.de> | 2020-10-06 20:49:18 +0200 |
|---|---|---|
| committer | tv <tv@krebsco.de> | 2020-10-06 20:51:13 +0200 |
| commit | 605687aef387e24c7a4245ad5ba35f58b29878b1 (patch) | |
| tree | 7cf4093eb50fd87b95415deb22d6290b096d9367 | |
| parent | d4eeab8a0e352cf2fca4ace17af8dd8798a3a712 (diff) | |
tv config: speed up horizontal tree movement
| -rw-r--r-- | config/tv.hs | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/config/tv.hs b/config/tv.hs index 5936a60..f7bdd90 100644 --- a/config/tv.hs +++ b/config/tv.hs @@ -39,12 +39,14 @@ myKeymap "k" = moveCursorUp 1 myKeymap "j" = moveCursorDown 1 myKeymap "K" = moveTreeDown 1 myKeymap "J" = moveTreeUp 1 +myKeymap "H" = moveTreeRight 8 +myKeymap "L" = moveTreeLeft 8 myKeymap "\ESC[A" = moveCursorUp 1 myKeymap "\ESC[B" = moveCursorDown 1 myKeymap "\ESC[a" = moveTreeDown 1 myKeymap "\ESC[b" = moveTreeUp 1 -myKeymap "\ESC[c" = moveTreeLeft 1 -- S-Right -myKeymap "\ESC[d" = moveTreeRight 1 -- S-Left +myKeymap "\ESC[c" = moveTreeLeft 8 -- S-Right +myKeymap "\ESC[d" = moveTreeRight 8 -- S-Left myKeymap "\ESC[5~" = \q -> moveTreeDown (screenHeight q `div` 2) q -- PgUp myKeymap "\ESC[6~" = \q -> moveTreeUp (screenHeight q `div` 2) q -- PgDn myKeymap "\n" = toggleFold |