X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2Fdirhand.t;h=aa7be356df3a9874836c54224af2ed52d5b8764d;hb=569bd3158af2276a406770e3d68e76b7da59b730;hp=8403609578eb4607de44344174b5f91dd2c940e5;hpb=b4a488b9f66ab1d51091a616c6fab3b3b300db36;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/t/lib/dirhand.t b/t/lib/dirhand.t
index 8403609..aa7be35 100755
--- a/t/lib/dirhand.t
+++ b/t/lib/dirhand.t
@@ -4,7 +4,7 @@ BEGIN {
     chdir 't' if -d 't';
     @INC = '../lib';
     require Config; import Config;
-    if ($Config{'extensions'} !~ /\bPOSIX\b/) {
+    if (not $Config{'d_readdir'}) {
 	print "1..0\n";
 	exit 0;
     }
@@ -17,7 +17,7 @@ print "1..5\n";
 $dot = new DirHandle ".";
 print defined($dot) ? "ok" : "not ok", " 1\n";
 
-@a = <*>;
+@a = sort <*>;
 do { $first = $dot->read } while defined($first) && $first =~ /^\./;
 print +(grep { $_ eq $first } @a) ? "ok" : "not ok", " 2\n";