Bug 39877: Remove files that have been deleted

Ignore deleted or renamed files

Signed-off-by: Victor Grousset/tuxayo <victor@tuxayo.net>
Signed-off-by: Paul Derscheid <paul.derscheid@lmscloud.de>
Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>
Signed-off-by: Tomás Cohen Arazi <tomascohen@theke.io>
Signed-off-by: Lucas Gass <lucas@bywatersolutions.com>
This commit is contained in:
Jonathan Druart 2025-05-12 15:07:15 +02:00 committed by Lucas Gass
parent 9f32eea89f
commit 4971ed8d68
No known key found for this signature in database
GPG Key ID: 60B447398B0D36CA
1 changed files with 2 additions and 2 deletions

View File

@ -161,8 +161,8 @@ sub ls_perl_files {
$git_range =~ s|\.\.| |;
my @modified_files = qx{git diff --name-only $git_range};
chomp @modified_files;
push @files, grep { /\.(pl|PL|pm|t)$/ } @modified_files;
push @files, grep { /^(svc|opac\/svc)/ } @modified_files;
push @files, grep { -e && /\.(pl|PL|pm|t)$/ } @modified_files;
push @files, grep { -e && /^(svc|opac\/svc)/ } @modified_files;
my @exception_files = $exceptions->{pl}->{ $self->{context} };
@files = array_minus( @files, @exception_files );
} else {