From: Michael G. Schwern <schwern@pobox.com>
Date: Thu, 8 Nov 2001 22:05:49 +0000 (-0500)
Subject: VMS test.com running in wrong order?
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=91af766ac8815630662ce7fde84b165de512e80f;p=p5sagit%2Fp5-mst-13.2.git

VMS test.com running in wrong order?
Message-Id: <20011108220549.F5587@blackrider>

p4raw-id: //depot/perl@12914
---

diff --git a/vms/test.com b/vms/test.com
index 372ed74..e2b9503 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/.*\]//;