summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
authorRafael Garcia-Suarez <rgarciasuarez@gmail.com>2006-02-15 13:22:27 +0000
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2006-02-15 13:22:27 +0000
commit28b6a6073c5db5b1818bbd7f98a2638af2383cbe (patch)
tree13c576143b4e57902036481ddf8471a444fd5c74 /lib
parent4d1321a770b2c1abed6424883ec43f5450b88465 (diff)
downloadperl-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.t2
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);
}