op/stat.t: SKIP count fix in case of no dirfd()
authorJarkko Hietaniemi <jhi@iki.fi>
Tue, 1 Aug 2006 08:04:26 +0000 (11:04 +0300)
committerSteve Hay <SteveHay@planit.com>
Tue, 1 Aug 2006 08:10:07 +0000 (08:10 +0000)
Message-Id: <200608010504.k7154QT3178692@kosh.hut.fi>

p4raw-id: //depot/perl@28635

t/op/stat.t

index 86d100b..bcf5bd1 100755 (executable)
@@ -480,7 +480,7 @@ ok(unlink($f), 'unlink tmp file');
 }
 
 SKIP: {
-    skip "No dirfd()", 2 unless $Config{d_dirfd};
+    skip "No dirfd()", 3 unless $Config{d_dirfd};
     ok(opendir(DIR, "."), 'Can open "." dir') || diag "Can't open '.':  $!";
     ok(stat(DIR), "stat() on dirhandle works"); 
     ok(-d -r _ , "chained -x's on dirhandle"); 
@@ -498,7 +498,7 @@ SKIP: {
     #PVIO's hold dirhandle information, so let's test them too.
 
     SKIP: {
-        skip "No dirfd()", 2 unless $Config{d_dirfd};
+        skip "No dirfd()", 3 unless $Config{d_dirfd};
         ok(opendir(DIR, "."), 'Can open "." dir') || diag "Can't open '.':  $!";
         ok(stat(*DIR{IO}), "stat() on *DIR{IO} works");
         ok(-d -r *DIR{IO} , "chained -x's on *DIR{IO}");