From 0c301f6387cbfe73255db670216b1c5cb9cab31e Mon Sep 17 00:00:00 2001 From: John McQuah Date: Wed, 13 Sep 2023 07:53:36 -0400 Subject: [PATCH] protect maintainer-clean-footprint from being deleted by prtwash,prtsweep --- scripts/prtsweep.pl | 3 ++- scripts/prtwash.pl | 2 +- 2 files changed, 3 insertions(+), 2 deletions(-) diff --git a/scripts/prtsweep.pl b/scripts/prtsweep.pl index b35f693..feabfec 100755 --- a/scripts/prtsweep.pl +++ b/scripts/prtsweep.pl @@ -103,7 +103,8 @@ sub parse_manifest { my $sigfile = shift; my $sigtype = (split /\//, $sigfile)[-1]; my @keeplist = ("Pkgfile",".footprint","README","README.md", - "pre-install","post-install",".32bit",".nostrip"); + "pre-install","post-install",".32bit",".nostrip", + "maintainer_clean_footprint"); push (@keeplist,$sigtype); open (FILE, $sigfile) or return @keeplist; while () { diff --git a/scripts/prtwash.pl b/scripts/prtwash.pl index 0916490..a52a6b8 100755 --- a/scripts/prtwash.pl +++ b/scripts/prtwash.pl @@ -134,7 +134,7 @@ sub keeplist { # remember to pop off the last two elements for regex purposes my $port = shift; my @keepers = ("Pkgfile",".footprint",".signature"); push (@keepers,"pre-install","post-install","README","README.md", - ".32bit",".nostrip") if $options{addons}==0; + ".32bit",".nostrip","maintainer_clean_footprint") if $options{addons}==0; my @parsed = parse_pkgfile("$port/Pkgfile"); # file existence already tested my $name = ${$parsed[0]}; # by the caller. But if Pkgfile