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

[Richard W.M. Jones]

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