summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>2000-04-24 05:52:43 +0000
committerGurusamy Sarathy <gsar@cpan.org>2000-04-24 05:52:43 +0000
commitfe9272ced9d1f0b76030a1cf4ae6a6f399a379e4 (patch)
treedb6e99f8f7919b60033928bdee021d1a437fe960
parentaff2e002bc5c5a509c27a18452c769d49daf568c (diff)
downloadperl-fe9272ced9d1f0b76030a1cf4ae6a6f399a379e4.tar.gz
ignore dotfiles (.cvsignore etc) in test (from Warren Jones
<wjones@tc.fluke.com>) p4raw-id: //depot/perl@5916
-rwxr-xr-xt/lib/glob-basic.t2
1 files changed, 1 insertions, 1 deletions
diff --git a/t/lib/glob-basic.t b/t/lib/glob-basic.t
index 47280831a9..89024baaab 100755
--- a/t/lib/glob-basic.t
+++ b/t/lib/glob-basic.t
@@ -27,7 +27,7 @@ $ENV{PATH} = "/bin";
delete @ENV{BASH_ENV, CDPATH, ENV, IFS};
@correct = ();
if (opendir(D, ".")) {
- @correct = grep { !/^\.\.?$/ } sort readdir(D);
+ @correct = grep { !/^\./ } sort readdir(D);
closedir D;
}
@a = File::Glob::glob("*", 0);