code cleanups

This commit is contained in:
Dietmar Maurer 2014-11-21 12:31:56 +01:00
parent 2c9e8036f5
commit f34ebd5259
2 changed files with 17 additions and 17 deletions

View File

@ -2591,7 +2591,7 @@ sub config_to_command {
my $total_cores = $sockets * $cores; my $total_cores = $sockets * $cores;
my $allowed_cores = $cpuinfo->{cpus}; my $allowed_cores = $cpuinfo->{cpus};
die "MAX $allowed_cores Cores allowed per VM on this Node" die "MAX $allowed_cores cores allowed per VM on this node\n"
if ($allowed_cores < $total_cores); if ($allowed_cores < $total_cores);
if ($maxcpus) { if ($maxcpus) {
@ -4935,9 +4935,9 @@ sub snapshot_create {
eval { vm_mon_cmd($vmid, "savevm-end") if $running; }; eval { vm_mon_cmd($vmid, "savevm-end") if $running; };
warn $@ if $@; warn $@ if $@;
#savevm-end is async, we need to wait # savevm-end is async, we need to wait
if($running) { if ($running) {
for(;;) { for (;;) {
my $stat = vm_mon_cmd_nocheck($vmid, "query-savevm"); my $stat = vm_mon_cmd_nocheck($vmid, "query-savevm");
if (!$stat->{bytes}) { if (!$stat->{bytes}) {
last; last;