The rebasing in commit 5dae9ca23dab90dfb890f6663aa4bacf1df31ced caused
this field to never get updated.
---
v2v/v2v.ml | 14 ++++++++------
1 file changed, 8 insertions(+), 6 deletions(-)
diff --git a/v2v/v2v.ml b/v2v/v2v.ml
index f494defcf..75936c501 100644
--- a/v2v/v2v.ml
+++ b/v2v/v2v.ml
@@ -113,11 +113,12 @@ let rec main () =
let mpstats = get_mpstats g in
check_guest_free_space mpstats;
- (match conversion_mode with
- | Copying (_, targets) ->
- check_target_free_space mpstats source targets output
- | In_place -> ()
- );
+ let conversion_mode =
+ match conversion_mode with
+ | Copying (overlays, targets) ->
+ let targets = check_target_free_space mpstats source targets output in
+ Copying (overlays, targets)
+ | In_place -> In_place in
(* Conversion. *)
let guestcaps =
@@ -598,7 +599,8 @@ and check_target_free_space mpstats source targets output =
message (f_"Estimating space required on target for each disk");
let targets = estimate_target_size mpstats targets in
- output#check_target_free_space source targets
+ output#check_target_free_space source targets;
+ targets
(* Conversion. *)
and do_convert g inspect source output rcaps =
--
2.13.2