From 605687aef387e24c7a4245ad5ba35f58b29878b1 Mon Sep 17 00:00:00 2001 From: tv Date: Tue, 6 Oct 2020 20:49:18 +0200 Subject: tv config: speed up horizontal tree movement --- config/tv.hs | 6 ++++-- 1 file 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 -- cgit v1.2.3