respect the hvm flags instead of creating hvm all the time.

diff --git a/xenvm/vmact.ml b/xenvm/vmact.ml
index 558f8c64914e167f5cc3052c852291859c4f9a8a..c87ef3fb58c3c0236090387cbb34facba8384f46 100644 (file)
--- a/xenvm/vmact.ml
+++ b/xenvm/vmact.ml
@@ -316,8 +316,8 @@ let create_vm xc xs state =
                );
                let info = {
                        Domain.ssidref = 0l;
-                       Domain.hvm = true;
-                       Domain.hap = true;
+                       Domain.hvm = state.vm_cfg.hvm;
+                       Domain.hap = state.vm_cfg.hvm;
                        Domain.name = "";
                        Domain.platformdata = state.vm_cfg.platform;
                        Domain.xsdata = [];