[dpkg] 14/28: test: Consider *.PL also to be perl files
Mattia Rizzolo
mattia at debian.org
Mon Jan 22 17:11:24 UTC 2018
This is an automated email from the git hooks/post-receive script.
mattia pushed a commit to branch master
in repository dpkg.
commit d6ba39af48a8c8eadc1b1542fcd6db0edf2dbe7f
Author: Guillem Jover <guillem at debian.org>
Date: Sun Oct 29 18:18:39 2017 +0100
test: Consider *.PL also to be perl files
---
debian/changelog | 1 +
scripts/Test/Dpkg.pm | 2 +-
2 files changed, 2 insertions(+), 1 deletion(-)
diff --git a/debian/changelog b/debian/changelog
index 85921f8..96cb317 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -49,6 +49,7 @@ dpkg (1.19.1) UNRELEASED; urgency=medium
* Test suite:
- Skip Dpkg::OpenPGP test if gpg is not present.
- Check POD in all perl scripts.
+ - Consider *.PL also to be perl files.
[ Updated programs translations ]
* Dutch (Frans Spiesschaert). Closes: #881401
diff --git a/scripts/Test/Dpkg.pm b/scripts/Test/Dpkg.pm
index 1b1a5d6..f0a73f8 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/;
--
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/reproducible/dpkg.git
More information about the Reproducible-commits
mailing list