--- Note: as a separate patch for readability PVE/QemuMigrate.pm | 22 +++++++++++----------- 1 file changed, 11 insertions(+), 11 deletions(-)
diff --git a/PVE/QemuMigrate.pm b/PVE/QemuMigrate.pm index e42e5b1..5bfdc05 100644 --- a/PVE/QemuMigrate.pm +++ b/PVE/QemuMigrate.pm @@ -230,26 +230,26 @@ sub sync_disks { my $sharedvm = 1; my @sids = PVE::Storage::storage_ids($self->{storecfg}); - foreach my $storeid (@sids) { + foreach my $storeid (@sids) { my $scfg = PVE::Storage::storage_config($self->{storecfg}, $storeid); - next if $scfg->{shared}; + next if $scfg->{shared}; next if !PVE::Storage::storage_check_enabled($self->{storecfg}, $storeid, undef, 1); - # get list from PVE::Storage (for unused volumes) - my $dl = PVE::Storage::vdisk_list($self->{storecfg}, $storeid, $vmid); + # get list from PVE::Storage (for unused volumes) + my $dl = PVE::Storage::vdisk_list($self->{storecfg}, $storeid, $vmid); next if @{$dl->{$storeid}} == 0; - # check if storage is available on target node - PVE::Storage::storage_check_node($self->{storecfg}, $storeid, $self->{node}); + # check if storage is available on target node + PVE::Storage::storage_check_node($self->{storecfg}, $storeid, $self->{node}); $sharedvm = 0; # there is a non-shared disk - PVE::Storage::foreach_volid($dl, sub { - my ($volid, $sid, $volname) = @_; + PVE::Storage::foreach_volid($dl, sub { + my ($volid, $sid, $volname) = @_; - $volhash->{$volid} = 1; - }); - } + $volhash->{$volid} = 1; + }); + } my $test_volid = sub { my ($volid, $is_cdrom, $snapname) = @_; -- 2.1.4 _______________________________________________ pve-devel mailing list pve-devel@pve.proxmox.com http://pve.proxmox.com/cgi-bin/mailman/listinfo/pve-devel