[Pkg-libvirt-commits] [libguestfs] 69/179: v2v: When choosing a root from several, print an info message.

[Hilko Bengen]

This is an automated email from the git hooks/post-receive script.

bengen pushed a commit to branch experimental
in repository libguestfs.

commit 04de9d3df064ab32ea31a0b803f29466cc0fc0d9
Author: Richard W.M. Jones <rjones at redhat.com>
Date:   Mon Oct 13 11:40:00 2014 +0200

    v2v: When choosing a root from several, print an info message.
---
 v2v/v2v.ml | 15 ++++++++++-----
 1 file changed, 10 insertions(+), 5 deletions(-)

diff --git a/v2v/v2v.ml b/v2v/v2v.ml
index a87fb1d..fdb5735 100644
--- a/v2v/v2v.ml
+++ b/v2v/v2v.ml
@@ -443,13 +443,18 @@ and inspect_source g root_choice =
         error (f_"multi-boot operating systems are not supported by virt-v2v. Use the --root option to change how virt-v2v handles this.")
 
       | `First ->
-        List.hd roots
+        let root = List.hd roots in
+        info ~prog (f_"Picked %s because '--root first' was used.") root;
+        root
 
       | `Dev dev ->
-        if List.mem dev roots then dev
-        else
-          error (f_"root device %s not found.  Roots found were: %s")
-            dev (String.concat " " roots) in
+        let root =
+          if List.mem dev roots then dev
+          else
+            error (f_"root device %s not found.  Roots found were: %s")
+              dev (String.concat " " roots) in
+        info ~prog (f_"Picked %s because '--root %s' was used.") root dev;
+        root in
 
   (* Reject this OS if it doesn't look like an installed image. *)
   let () =

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-libvirt/libguestfs.git