mirror of
https://git.proxmox.com/git/qemu-server
synced 2025-06-19 22:24:52 +00:00
followup: refactor loop to use perls values
Signed-off-by: Thomas Lamprecht <t.lamprecht@proxmox.com>
This commit is contained in:
parent
84da82174e
commit
abff03211f
@ -3469,8 +3469,8 @@ __PACKAGE__->register_method({
|
||||
$rpcenv->check_vm_perm($authuser, $vmid, undef, ['VM.Config.Disk'])
|
||||
if !defined($storagemap->{identity});
|
||||
|
||||
foreach my $source (keys %{$storagemap->{entries}}) {
|
||||
$check_storage->($storagemap->{entries}->{$source});
|
||||
foreach my $source (values %{$storagemap->{entries}}) {
|
||||
$check_storage->($source);
|
||||
}
|
||||
|
||||
$check_storage->($storagemap->{default})
|
||||
|
Loading…
Reference in New Issue
Block a user