]> git.proxmox.com Git - pve-kernel.git/commitdiff
debian: update postinst, postrm and prerm script style
authorThomas Lamprecht <t.lamprecht@proxmox.com>
Tue, 13 Jun 2023 13:14:15 +0000 (15:14 +0200)
committerThomas Lamprecht <t.lamprecht@proxmox.com>
Tue, 13 Jun 2023 13:14:15 +0000 (15:14 +0200)
Signed-off-by: Thomas Lamprecht <t.lamprecht@proxmox.com>
debian/pve-kernel.postinst.in
debian/pve-kernel.postrm.in
debian/pve-kernel.prerm.in

index 3340eee40fa4d7f53967528157da85f0ca8c2d4c..d35dad51dc4dbe59eca9851c1bca0895fa24d04a 100755 (executable)
@@ -1,6 +1,7 @@
-#!/usr/bin/perl -w
+#!/usr/bin/perl
 
 use strict;
+use warnings;
 
 # Ignore all invocations except when called on to configure.
 exit 0 unless $ARGV[0] =~ /configure/;
@@ -16,10 +17,9 @@ system("depmod $version");
 
 if (-d "/etc/kernel/postinst.d") {
   print STDERR "Examining /etc/kernel/postinst.d.\n";
-  system ("run-parts --verbose --exit-on-error --arg=$version " .
-          "--arg=$imagedir/vmlinuz-$version " .
-          "/etc/kernel/postinst.d") &&
-            die "Failed to process /etc/kernel/postinst.d";
+  system(
+      "run-parts --verbose --exit-on-error --arg=$version --arg=$imagedir/vmlinuz-$version /etc/kernel/postinst.d"
+  ) && die "Failed to process /etc/kernel/postinst.d";
 }
 
 exit 0
index f0f56f7f50333e002ad46010ed5a1d4e0b1373b2..019d5e9863dc77adea0ab8f0f8f65d3ee8742d45 100644 (file)
@@ -1,6 +1,7 @@
-#!/usr/bin/perl -w
+#!/usr/bin/perl
 
 use strict;
+use warnings;
 
 # Ignore all 'upgrade' invocations .
 exit 0 if $ARGV[0] =~ /upgrade/;
@@ -11,10 +12,9 @@ my $version = "@@KVNAME@@";
 
 if (-d "/etc/kernel/postrm.d") {
   print STDERR "Examining /etc/kernel/postrm.d.\n";
-  system ("run-parts --verbose --exit-on-error --arg=$version " .
-          "--arg=$imagedir/vmlinuz-$version " .
-          "/etc/kernel/postrm.d") &&
-            die "Failed to process /etc/kernel/postrm.d";
+  system (
+      "run-parts --verbose --exit-on-error --arg=$version --arg=$imagedir/vmlinuz-$version /etc/kernel/postrm.d"
+  ) && die "Failed to process /etc/kernel/postrm.d";
 }
 
 unlink "$imagedir/initrd.img-$version";
@@ -25,15 +25,15 @@ unlink "/var/lib/initramfs-tools/$version";
 exit 0 unless $ARGV[0] =~ /purge/;
 
 my @files_to_remove = qw{
-                         modules.dep modules.isapnpmap modules.pcimap
-                         modules.usbmap modules.parportmap
-                         modules.generic_string modules.ieee1394map
-                         modules.ieee1394map modules.pnpbiosmap
-                         modules.alias modules.ccwmap modules.inputmap
-                         modules.symbols modules.ofmap
-                         modules.seriomap modules.*.bin
-                        modules.softdep modules.devname
-                       };
+    modules.dep modules.isapnpmap modules.pcimap
+    modules.usbmap modules.parportmap
+    modules.generic_string modules.ieee1394map
+    modules.ieee1394map modules.pnpbiosmap
+    modules.alias modules.ccwmap modules.inputmap
+    modules.symbols modules.ofmap
+    modules.seriomap modules.*.bin
+    modules.softdep modules.devname
+};
 
 foreach my $extra_file (@files_to_remove) {
     for (glob("/lib/modules/$version/$extra_file")) {
index 486f86729d574b310b096aaab2001c302d02fbc4..3c25fe647dab5a8c530e2d3f9a6d23eb94e46199 100755 (executable)
@@ -1,6 +1,7 @@
-#!/usr/bin/perl -w
+#!/usr/bin/perl
 
 use strict;
+use warnings;
 
 # Ignore all invocations uxcept when called on to remove
 exit 0 unless ($ARGV[0] && $ARGV[0] =~ /remove/) ;
@@ -14,10 +15,9 @@ my $version = "@@KVNAME@@";
 
 if (-d "/etc/kernel/prerm.d") {
   print STDERR "Examining /etc/kernel/prerm.d.\n";
-  system ("run-parts --verbose --exit-on-error --arg=$version " . 
-          "--arg=$imagedir/vmlinuz-$version " .
-          "/etc/kernel/prerm.d") &&
-         die "Failed to process /etc/kernel/prerm.d";
+  system(
+      "run-parts --verbose --exit-on-error --arg=$version --arg=$imagedir/vmlinuz-$version /etc/kernel/prerm.d"
+  ) && die "Failed to process /etc/kernel/prerm.d";
 }
 
 exit 0