summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorG.raud <graud@gmx.com>2018-01-29 08:19:42 +0100
committerG.raud <graud@gmx.com>2018-02-02 20:09:26 +0100
commit99a0a7df96bd45fa41ff6373ba7af9922f68e084 (patch)
treee5e76f06ec34daf2b50a412d2e692f9b8ab00c87
parent936e826c7dca20f591485fab8f4a905eb1f11b62 (diff)
downloadunison-99a0a7df96bd45fa41ff6373ba7af9922f68e084.zip
unison-99a0a7df96bd45fa41ff6373ba7af9922f68e084.tar.gz
unison-99a0a7df96bd45fa41ff6373ba7af9922f68e084.tar.bz2
Uitext: new action "reverse" (at the "reconcile" prompt)
-rw-r--r--src/uitext.ml4
1 files changed, 4 insertions, 0 deletions
diff --git a/src/uitext.ml b/src/uitext.ml
index e4c9aea..345c919 100644
--- a/src/uitext.ml
+++ b/src/uitext.ml
@@ -378,6 +378,10 @@ let interact prilist rilist =
("stop the selection"),
(fun () -> newLine();
(ConfirmBeforeProceeding, Safelist.rev_append prev ril)));
+ (["R"],
+ ("reverse the list"),
+ (fun () -> newLine();
+ loop rest (ri::prev)));
(["g"],
("proceed immediately to propagating changes"),
(fun () -> newLine();