Bug 39149: Make perltidy.t also check .PL files

Now perltidy.t will check 2958 files instead of 2954. Which matches
with the 4 .PL files.

Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>
Signed-off-by: Katrin Fischer <katrin.fischer@bsz-bw.de>
This commit is contained in:
Victor Grousset 2025-02-17 20:36:35 +01:00 committed by Katrin Fischer
parent 50d1acb3de
commit 81df6dbe64
Signed by: kfischer
GPG key ID: 0EF6E2C03357A834

View file

@ -4,7 +4,7 @@ use Test::PerlTidy;
use Test::More; use Test::More;
my @files; my @files;
push @files, qx{git ls-files '*.pl' '*.pm' '*.t' ':(exclude)Koha/Schema/Result' ':(exclude)Koha/Schema.pm'}; push @files, qx{git ls-files '*.pl' '*.PL' '*.pm' '*.t' ':(exclude)Koha/Schema/Result' ':(exclude)Koha/Schema.pm'};
push @files, qx{git ls-files svc opac/svc}; # Files without extension push @files, qx{git ls-files svc opac/svc}; # Files without extension
plan tests => scalar @files; plan tests => scalar @files;