diff options
author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2006-02-15 13:22:27 +0000 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2006-02-15 13:22:27 +0000 |
commit | 28b6a6073c5db5b1818bbd7f98a2638af2383cbe (patch) | |
tree | 13c576143b4e57902036481ddf8471a444fd5c74 /lib | |
parent | 4d1321a770b2c1abed6424883ec43f5450b88465 (diff) | |
download | perl-28b6a6073c5db5b1818bbd7f98a2638af2383cbe.tar.gz |
Fix to run this test in the core
p4raw-id: //depot/perl@27193
Diffstat (limited to 'lib')
-rw-r--r-- | lib/CPAN/t/03pkgs.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/CPAN/t/03pkgs.t b/lib/CPAN/t/03pkgs.t index d6fa715642..aad03c6309 100644 --- a/lib/CPAN/t/03pkgs.t +++ b/lib/CPAN/t/03pkgs.t @@ -3,11 +3,11 @@ use strict; eval 'use warnings'; -opendir DH, "lib/CPAN" or die; my @m; if ($ENV{PERL_CORE}){ @m = ("CPAN", map { "CPAN::$_" } qw(Debug FirstTime Nox Tarzip Version)); } else { + opendir DH, "lib/CPAN" or die; @m = ("CPAN", map { "CPAN::$_" } grep { s/\.pm$// } readdir DH); } |