mirrors/libguestfs
1
0
Fork 0
mirror of https://github.com/libguestfs/libguestfs.git synced 2026-03-22 07:03:38 +00:00
Code Issues Packages Projects Releases Wiki Activity

v2v: When choosing a root from several, print an info message.

Browse Source
This commit is contained in:
Richard W.M. Jones
2014-10-13 11:40:00 +02:00
parent 2ba45489a1
commit 04de9d3df0
1 changed files with 10 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
v2v/v2v.ml
View File

@@ -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 () =