Pause the vm once is created only if startup = paused.

diff --git a/xenvm/vmact.ml b/xenvm/vmact.ml
index 38f73fd2576d4cb74a3ce163ae8a0d788e248c1b..6a41563cc2ee44c5144c9ad568e2487edf5d2247 100644 (file)
--- a/xenvm/vmact.ml
+++ b/xenvm/vmact.ml
@@ -478,7 +478,7 @@ let start_vm xc xs state =
        create_vm xc xs state;
        build_vm xc xs state from_scratch false;
 
-       if cfg.startup = StartupStart then (
+       if cfg.startup <> StartupPause then (
                try
                        Domain.unpause ~xc state.vm_domid;
                        change_vmstate state VmRunning;