protect maintainer-clean-footprint from being deleted by prtwash,prtsweep

This commit is contained in:
John McQuah 2023-09-13 07:53:36 -04:00
parent f91912b1f7
commit 0c301f6387
2 changed files with 3 additions and 2 deletions

View File

@ -103,7 +103,8 @@ sub parse_manifest {
my $sigfile = shift; my $sigfile = shift;
my $sigtype = (split /\//, $sigfile)[-1]; my $sigtype = (split /\//, $sigfile)[-1];
my @keeplist = ("Pkgfile",".footprint","README","README.md", 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); push (@keeplist,$sigtype);
open (FILE, $sigfile) or return @keeplist; open (FILE, $sigfile) or return @keeplist;
while (<FILE>) { while (<FILE>) {

View File

@ -134,7 +134,7 @@ sub keeplist { # remember to pop off the last two elements for regex purposes
my $port = shift; my $port = shift;
my @keepers = ("Pkgfile",".footprint",".signature"); my @keepers = ("Pkgfile",".footprint",".signature");
push (@keepers,"pre-install","post-install","README","README.md", 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 @parsed = parse_pkgfile("$port/Pkgfile"); # file existence already tested
my $name = ${$parsed[0]}; # by the caller. But if Pkgfile my $name = ${$parsed[0]}; # by the caller. But if Pkgfile