code cleanup

Signed-off-by: Thomas Lamprecht <t.lamprecht@proxmox.com>

diff --git a/proxinstall b/proxinstall
index ce2cb29dc321cec5045d6143bd702b0d684cc398..70dab304e4c58aeea3e25e4108c9d615b05f3dcd 100755 (executable)
--- a/proxinstall
+++ b/proxinstall
@@ -1362,7 +1362,7 @@ sub extract_data {
                $disksize = $size;
            }
 
-           &$udevadm_trigger_block();
+           $udevadm_trigger_block->();
 
            btrfs_create($btrfs_partitions, $btrfs_mode);
 
@@ -1371,7 +1371,7 @@ sub extract_data {
            my ($devlist, $vdev) = get_zfs_raid_setup();
 
            foreach my $hd (@$devlist) {
-               &$clean_disk(@$hd[1]);
+               $clean_disk->(@$hd[1]);
            }
 
            # install esp/boot part on all, we can only win!
@@ -1394,7 +1394,7 @@ sub extract_data {
                $disksize = $size;
            }
 
-           &$udevadm_trigger_block();
+           $udevadm_trigger_block->();
 
            foreach my $di (@$bootdevinfo) {
                my $devname = $di->{devname};
@@ -3341,7 +3341,6 @@ sub legacy_bios_4k_check {
 }
 
 sub get_zfs_raid_setup {
-
     my $filesys = $config_options->{filesys};
 
     my $devlist = &$get_raid_devlist();