summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorG.raud <graud@gmx.com>2018-02-03 11:34:57 +0100
committerG.raud <graud@gmx.com>2018-02-03 18:17:13 +0100
commitdab5ecdffafb2b59d09c84785c25cfebf7ebcb69 (patch)
tree37ab0d152bc466e081f88400e666f8ab5c2ce9be
parent43b9ebd5ea7b32f093ede31fb0c4b129d0b4adad (diff)
downloadunison-dab5ecdffafb2b59d09c84785c25cfebf7ebcb69.zip
unison-dab5ecdffafb2b59d09c84785c25cfebf7ebcb69.tar.gz
unison-dab5ecdffafb2b59d09c84785c25cfebf7ebcb69.tar.bz2
Uitext: add a few vi-like keybindings
-rw-r--r--src/uitext.ml6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/uitext.ml b/src/uitext.ml
index e320ab0..b491681 100644
--- a/src/uitext.ml
+++ b/src/uitext.ml
@@ -367,11 +367,11 @@ let interact prilist rilist =
repeat()
end else
next()));
- (["n"],
+ (["n";"j"],
("go to the next item"),
(fun () -> newLine();
next()));
- (["p";"b"],
+ (["p";"b";"k"],
("go back to previous item"),
(fun () -> newLine();
previous prev ril));
@@ -472,7 +472,7 @@ let interact prilist rilist =
(fun () -> newLine();
ripred := None;
repeat()));
- (["r"],
+ (["r";"u"],
("revert to " ^ Uutil.myName ^ "'s default recommendation (curr or match)"),
(fun () ->
actOnMatching