Update of /cvsroot/module-build/Module-Build/lib/Module/Build
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv16216/lib/Module/Build
Modified Files:
Tag: release-0_26_branch
Base.pm
Log Message:
Fix regex in expand_test_dir()
Index: Base.pm
===================================================================
RCS file: /cvsroot/module-build/Module-Build/lib/Module/Build/Base.pm,v
retrieving revision 1.340.2.2
retrieving revision 1.340.2.3
diff -C2 -d -r1.340.2.2 -r1.340.2.3
*** Base.pm 15 Nov 2004 19:51:10 -0000 1.340.2.2
--- Base.pm 15 Nov 2004 20:13:16 -0000 1.340.2.3
***************
*** 1346,1350 ****
sub expand_test_dir {
my ($self, $dir) = @_;
! return sort @{$self->rscan_dir($dir, qr{\.t$})} if $self->recursive_test_files;
return sort glob File::Spec->catfile($dir, "*.t");
}
--- 1346,1350 ----
sub expand_test_dir {
my ($self, $dir) = @_;
! return sort @{$self->rscan_dir($dir, qr{^[^.].*\.t$})} if $self->recursive_test_files;
return sort glob File::Spec->catfile($dir, "*.t");
}
|