[Libguestfs] [PATCH 1/2] v2v: Update target.target_estimated_size in targets list in main function.

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