mirror of
https://git.proxmox.com/git/qemu-server
synced 2026-01-24 17:25:54 +00:00
avoid warning if vm does not belong to a pool
This commit is contained in:
parent
a125592ce0
commit
5d0094ead9
@ -907,11 +907,12 @@ __PACKAGE__->register_method({
|
||||
|
||||
my $delVMfromPoolFn = sub {
|
||||
my $usercfg = cfs_read_file("user.cfg");
|
||||
my $pool = $usercfg->{vms}->{$vmid};
|
||||
if (my $data = $usercfg->{pools}->{$pool}) {
|
||||
delete $data->{vms}->{$vmid};
|
||||
delete $usercfg->{vms}->{$vmid};
|
||||
cfs_write_file("user.cfg", $usercfg);
|
||||
if (my $pool = $usercfg->{vms}->{$vmid}) {
|
||||
if (my $data = $usercfg->{pools}->{$pool}) {
|
||||
delete $data->{vms}->{$vmid};
|
||||
delete $usercfg->{vms}->{$vmid};
|
||||
cfs_write_file("user.cfg", $usercfg);
|
||||
}
|
||||
}
|
||||
};
|
||||
|
||||
|
||||
Loading…
Reference in New Issue
Block a user