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: Add missing disk <rasd:Caption>.

Browse Source 
Possible fix for RHBZ#1150475.
This commit is contained in:
Richard W.M. Jones
2014-10-08 12:37:51 +01:00
parent cfe2daabb2
commit 7c97b01f27
1 changed files with 5 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
v2v/lib_ovf.ml
View File

@@ -393,7 +393,12 @@ and add_disks targets guestcaps output_alloc sd_uuid image_uuid vol_uuids ovf =
(* Add disk to VirtualHardware. *)
let item =
(* This text MUST begin with the string "Drive " or the file
* will not parse.
*)
let caption = sprintf "Drive %d" (i+1) in
e "Item" [] [
e "rasd:Caption" [] [PCData caption];
e "rasd:InstanceId" [] [PCData vol_uuid];
e "rasd:ResourceType" [] [PCData "17"];
e "rasd:HostResource" [] [PCData fileref];