From 7f5fb49a7c610307ba9126c8b83c08ecd6ef8c74 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Fabian=20Gr=C3=BCnbichler?= <f.gruenbichler@proxmox.com>
Date: Thu, 26 Mar 2020 15:42:58 +0100
Subject: [PATCH] migrate: fix auto-vivification in cleanup_bitmaps
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

this does not currently trigger since nothing uses $self->{target_drive}
afterwards.

Signed-off-by: Fabian Grünbichler <f.gruenbichler@proxmox.com>
---
 PVE/QemuMigrate.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/PVE/QemuMigrate.pm b/PVE/QemuMigrate.pm
index b14ee012..9ded16cf 100644
--- a/PVE/QemuMigrate.pm
+++ b/PVE/QemuMigrate.pm
@@ -554,7 +554,7 @@ sub cleanup_remotedisks {
 
 sub cleanup_bitmaps {
     my ($self) = @_;
-    foreach my $drive (%{$self->{target_drive}}) {
+    foreach my $drive (keys %{$self->{target_drive}}) {
 	my $bitmap = $self->{target_drive}->{$drive}->{bitmap};
 	next if !$bitmap;
 	$self->log('info', "$drive: removing block-dirty-bitmap '$bitmap'");