diff options
author | Guillem Jover <guillem@debian.org> | 2017-10-29 18:18:39 +0100 |
---|---|---|
committer | Guillem Jover <guillem@debian.org> | 2018-01-16 10:55:30 +0100 |
commit | d6ba39af48a8c8eadc1b1542fcd6db0edf2dbe7f (patch) | |
tree | 86970564a0f0b429e1aeae7c60865c99af031f9c /scripts/Test | |
parent | 11e20af76b831cb569950c341cf78c55d7ad9a00 (diff) | |
download | dpkg-d6ba39af48a8c8eadc1b1542fcd6db0edf2dbe7f.tar.gz |
test: Consider *.PL also to be perl files
Diffstat (limited to 'scripts/Test')
-rw-r--r-- | scripts/Test/Dpkg.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/scripts/Test/Dpkg.pm b/scripts/Test/Dpkg.pm index 1b1a5d67e..f0a73f8af 100644 --- a/scripts/Test/Dpkg.pm +++ b/scripts/Test/Dpkg.pm @@ -65,7 +65,7 @@ sub test_get_perl_dirs sub all_perl_files { - my $filter = shift // qr/\.(?:pl|pm|t)$/; + my $filter = shift // qr/\.(?:PL|pl|pm|t)$/; my @files; my $scan_perl_files = sub { push @files, $File::Find::name if m/$filter/; |