use vm_mon_cmd_nocheck at startup

[qemu-server.git] / PVE / QemuServer.pm

diff --git a/PVE/QemuServer.pm b/PVE/QemuServer.pm
index 81a935176aca16e013fd6987f2ddbc72260092cf..165eaf6be6e5fe4b1c88454d28b113bc2b1f20af 100644 (file)
--- a/PVE/QemuServer.pm
+++ b/PVE/QemuServer.pm
@@ -2972,7 +2972,7 @@ sub vm_start {
        print "migration listens on port $migrate_port\n" if $migrate_port;
 
        if ($statefile && $statefile ne 'tcp')  {
-           eval { vm_mon_cmd($vmid, "cont"); };
+           eval { vm_mon_cmd_nocheck($vmid, "cont"); };
            warn $@ if $@;
        }
 
@@ -2982,13 +2982,13 @@ sub vm_start {
        $migrate_speed = $conf->{migrate_speed} || $migrate_speed;
        $migrate_speed = $migrate_speed * 1048576;
        eval {
-           vm_mon_cmd($vmid, "migrate_set_speed", value => $migrate_speed);
+           vm_mon_cmd_nocheck($vmid, "migrate_set_speed", value => $migrate_speed);
        };
 
        my $migrate_downtime = $defaults->{migrate_downtime};
        $migrate_downtime = $conf->{migrate_downtime} if defined($conf->{migrate_downtime});
        if (defined($migrate_downtime)) {
-           eval { vm_mon_cmd($vmid, "migrate_set_downtime", value => $migrate_downtime); };
+           eval { vm_mon_cmd_nocheck($vmid, "migrate_set_downtime", value => $migrate_downtime); };
        }
 
        if($migratedfrom) {
@@ -3001,9 +3001,9 @@ sub vm_start {
        # fixme: how do we handle that on migration?
 
        if (!defined($conf->{balloon}) || $conf->{balloon}) {
-           vm_mon_cmd($vmid, "balloon", value => $conf->{balloon}*1024*1024) 
+           vm_mon_cmd_nocheck($vmid, "balloon", value => $conf->{balloon}*1024*1024) 
                if $conf->{balloon};
-           vm_mon_cmd($vmid, 'qom-set', 
+           vm_mon_cmd_nocheck($vmid, 'qom-set', 
                       path => "machine/peripheral/balloon0", 
                       property => "stats-polling-interval", 
                       value => 2);