Change 14344 by jhi@alpha on 2002/01/19 16:11:09
Subject: [PATCH] ext/File/Glob/t/basic.t - VOS patch
From: [EMAIL PROTECTED]
Date: Sat, 19 Jan 02 11:20 est
Message-Id: <[EMAIL PROTECTED]>
Affected files ...
.... //depot/perl/ext/File/Glob/t/basic.t#6 edit
Differences ...
==== //depot/perl/ext/File/Glob/t/basic.t#6 (xtext) ====
Index: perl/ext/File/Glob/t/basic.t
--- perl/ext/File/Glob/t/basic.t.~1~ Sat Jan 19 09:15:06 2002
+++ perl/ext/File/Glob/t/basic.t Sat Jan 19 09:15:06 2002
@@ -92,9 +92,15 @@
#print "\@a = ", array(@a);
rmdir $dir;
if (scalar(@a) != 0 || GLOB_ERROR == 0) {
- print "not ";
+ if ($^O eq 'vos') {
+ print "not ok 6 -- hit VOS bug posix-956\n";
+ } else {
+ print "not ok 6\n";
+ }
+ }
+ else {
+ print "ok 6\n";
}
- print "ok 6\n";
}
# check for csh style globbing
End of Patch.
