summaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorG.raud <graud@gmx.com>2018-01-27 22:27:10 +0100
committerG.raud <graud@gmx.com>2018-01-28 07:15:54 +0100
commitaa04453843529e6b905744f9cbb5265e755dde9b (patch)
tree0582ee6409b582830424923aa056d164c3060ff8 /src
parent1d70402d593ae8da93ab08d07e62aa17f0cf4457 (diff)
downloadunison-aa04453843529e6b905744f9cbb5265e755dde9b.zip
unison-aa04453843529e6b905744f9cbb5265e755dde9b.tar.gz
unison-aa04453843529e6b905744f9cbb5265e755dde9b.tar.bz2
Uitext.interact: place the host display at the start (no functional changes)
Diffstat (limited to 'src')
-rw-r--r--src/uitext.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/uitext.ml b/src/uitext.ml
index 7dea571..ba7040f 100644
--- a/src/uitext.ml
+++ b/src/uitext.ml
@@ -242,9 +242,9 @@ type proceed = ConfirmBeforeProceeding | ProceedImmediately
(* "interact [] rilist" interactively reconciles each list item *)
let interact prilist rilist =
+ if not (Prefs.read Globals.batch) then display ("\n" ^ Uicommon.roots2string() ^ "\n");
let (r1,r2) = Globals.roots() in
let (host1, host2) = root2hostname r1, root2hostname r2 in
- if not (Prefs.read Globals.batch) then display ("\n" ^ Uicommon.roots2string() ^ "\n");
let rec loop prev =
let rec previous prev ril =
match prev with