cleanup: get rid of unnecessary closures

Signed-off-by: Fabian Ebner <f.ebner@proxmox.com>

diff --git a/PVE/QemuServer.pm b/PVE/QemuServer.pm
index 63b368fbe1c0b7e1b54b3d11fcc2750eaa8cf845..efacc459de55ba1dfd0c25647b416a50843f669d 100644 (file)
--- a/PVE/QemuServer.pm
+++ b/PVE/QemuServer.pm
@@ -4339,17 +4339,10 @@ sub foreach_volid {
        include_unused => 1,
     };
 
        include_unused => 1,
     };
 

-    PVE::QemuConfig->foreach_volume_full($conf, $include_opts, sub {
-       my ($ds, $drive) = @_;
-       $test_volid->($ds, $drive);
-    });
-
+    PVE::QemuConfig->foreach_volume_full($conf, $include_opts, $test_volid);

     foreach my $snapname (keys %{$conf->{snapshots}}) {
        my $snap = $conf->{snapshots}->{$snapname};
     foreach my $snapname (keys %{$conf->{snapshots}}) {
        my $snap = $conf->{snapshots}->{$snapname};

-       PVE::QemuConfig->foreach_volume_full($snap, $include_opts, sub {
-           my ($ds, $drive) = @_;
-           $test_volid->($ds, $drive, $snapname);
-        });
+       PVE::QemuConfig->foreach_volume_full($snap, $include_opts, $test_volid, $snapname);

     }
 
     foreach my $volid (keys %$volhash) {
     }
 
     foreach my $volid (keys %$volhash) {