diff options
| author |   afresh1 <afresh1@openbsd.org> | 2019-02-13 21:15:00 +0000 |
|---|---|---|
| committer | afresh1 <afresh1@openbsd.org> | 2019-02-13 21:15:00 +0000 |
| commit | 9f11ffb7133c203312a01e4b986886bc88c7d74b (patch) | |
| tree | 6618511204c614b20256e4ef9dea39a7b311d638 /gnu/usr.bin/perl/t/lib/common.pl | |
| parent | Import perl-5.28.1 (diff) | |
| download | wireguard-openbsd-9f11ffb7133c203312a01e4b986886bc88c7d74b.tar.xz wireguard-openbsd-9f11ffb7133c203312a01e4b986886bc88c7d74b.zip | |
Fix merge issues, remove excess files - match perl-5.28.1 dist
looking good sthen@, Great! bluhm@
Diffstat (limited to 'gnu/usr.bin/perl/t/lib/common.pl')
| -rw-r--r-- | gnu/usr.bin/perl/t/lib/common.pl | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/gnu/usr.bin/perl/t/lib/common.pl b/gnu/usr.bin/perl/t/lib/common.pl index 367c676d516..9c7060ff38c 100644 --- a/gnu/usr.bin/perl/t/lib/common.pl +++ b/gnu/usr.bin/perl/t/lib/common.pl @@ -27,7 +27,12 @@ if (@ARGV) { print "ARGV = [@ARGV]\n"; @w_files = map { "./lib/$pragma_name/$_" } @ARGV; } else { - @w_files = sort glob catfile(curdir(), "lib", $pragma_name, "*"); + @w_files = sort grep !/( \.rej | ~ | \ \(Autosaved\)\.txt ) \z/nx, + glob catfile(curdir(), "lib", $pragma_name, "*"); +} + +if ($::IS_EBCDIC) { # Skip Latin1 files + @w_files = grep { $_ !~ / _l1 $/x } @w_files } my ($tests, @prgs) = setup_multiple_progs(@w_files); |