summaryrefslogtreecommitdiff
path: root/vms
diff options
context:
space:
mode:
authorMichael G. Schwern <schwern@pobox.com>2001-11-08 17:05:49 -0500
committerAbhijit Menon-Sen <ams@wiw.org>2001-11-09 14:05:12 +0000
commit91af766ac8815630662ce7fde84b165de512e80f (patch)
tree1c9fc8ca4331540d218c6581b45808214e34f928 /vms
parent57e69e5f8ac995629386b795ce81f2627a6abd08 (diff)
downloadperl-91af766ac8815630662ce7fde84b165de512e80f.tar.gz
VMS test.com running in wrong order?
Message-Id: <20011108220549.F5587@blackrider> p4raw-id: //depot/perl@12914
Diffstat (limited to 'vms')
-rw-r--r--vms/test.com2
1 files changed, 1 insertions, 1 deletions
diff --git a/vms/test.com b/vms/test.com
index 372ed74a22..e2b9503c96 100644
--- a/vms/test.com
+++ b/vms/test.com
@@ -144,7 +144,7 @@ if (lc($ARGV[0]) eq '-v') {
chdir 't' if -f 't/TEST';
if ($ARGV[0] eq '') {
- foreach (<[-.ext...]*.t>, <[-.lib...]*.t>, <[.*]*.t>) {
+ foreach (<[.*]*.t>, <[-.ext...]*.t>, <[-.lib...]*.t>) {
$_ = File::Spec->abs2rel($_);
s/\[([a-z]+)/[.$1/; # hmm, abs2rel doesn't do subdirs of the cwd
($fname = $_) =~ s/.*\]//;