PVE/API2/Qemu.pm: cleanup - remove unused $upid parameter

[qemu-server.git] / PVE / API2 / Qemu.pm

diff --git a/PVE/API2/Qemu.pm b/PVE/API2/Qemu.pm
index b5b183f40a97b464ce63f561f6a4b13d69899423..76fd0e44280185a1dd6f88ec964ca1072165440d 100644 (file)
--- a/PVE/API2/Qemu.pm
+++ b/PVE/API2/Qemu.pm
@@ -2857,17 +2857,15 @@ __PACKAGE__->register_method({
 
        } else {
 
-           my $code = sub {
-               my $realcmd = sub {
-                   my $upid = shift;
-
-                   PVE::QemuMigrate->migrate($target, $targetip, $vmid, $param);
-               };
+           my $realcmd = sub {
+               PVE::QemuMigrate->migrate($target, $targetip, $vmid, $param);
+           };
 
-               return $rpcenv->fork_worker('qmigrate', $vmid, $authuser, $realcmd);
+           my $worker = sub {
+               return PVE::GuestHelpers::guest_migration_lock($vmid, 10, $realcmd);
            };
 
-           return PVE::GuestHelpers::guest_migration_lock($vmid, 10, $code);
+           return $rpcenv->fork_worker('qmigrate', $vmid, $authuser, $worker);
        }
 
     }});