Thanks: Vladik Romanovsky, Ming Xie.
---
 v2v/output_glance.ml | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/v2v/output_glance.ml b/v2v/output_glance.ml
index e38b172..179448b 100644
--- a/v2v/output_glance.ml
+++ b/v2v/output_glance.ml
@@ -92,6 +92,10 @@ object
            | Virtio_net -> "virtio"
            | E1000 -> "e1000"
            | RTL8139 -> "rtl8139");
+          "hw_video_model",
+          (match guestcaps.gcaps_video with
+           | QXL -> "qxl"
+           | Cirrus -> "cirrus");
           "architecture", guestcaps.gcaps_arch;
           "hypervisor_type", "kvm";
           "vm_mode", "hvm";
-- 
2.7.4

_______________________________________________
Libguestfs mailing list
[email protected]
https://www.redhat.com/mailman/listinfo/libguestfs

Reply via email to