[Module-build-checkins] Module-Build/lib/Module/Build Base.pm,1.340.2.2,1.340.2.3
Status: Beta
Brought to you by:
kwilliams
From: Ken W. <kwi...@us...> - 2004-11-15 20:13:26
|
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"); } |