diff options
Diffstat (limited to 'contrib/perl5/t/pragma/warnings.t')
| -rwxr-xr-x | contrib/perl5/t/pragma/warnings.t | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/contrib/perl5/t/pragma/warnings.t b/contrib/perl5/t/pragma/warnings.t index 71fb0df..66b4ff9 100755 --- a/contrib/perl5/t/pragma/warnings.t +++ b/contrib/perl5/t/pragma/warnings.t @@ -2,7 +2,7 @@ BEGIN { chdir 't' if -d 't'; - unshift @INC, '../lib'; + @INC = '../lib'; $ENV{PERL5LIB} = '../lib'; require Config; import Config; } @@ -26,9 +26,7 @@ else foreach (@w_files) { - next if /\.orig$/ ; - - next if /(~|\.orig)$/; + next if /(~|\.orig|,v)$/; open F, "<$_" or die "Cannot open $_: $!\n" ; while (<F>) { |
