Integrate mainline (for ndbm fixes etc.)
[p5sagit/p5-mst-13.2.git] / t / io / fs.t
index 7331cd4..3eb3e0a 100755 (executable)
--- a/t/io/fs.t
+++ b/t/io/fs.t
@@ -239,7 +239,7 @@ close(IOFSCOM);
 SKIP: {
     eval { truncate "Iofs.tmp", 5; };
 
-    skip("no truncate - $@", 4) if $@;
+    skip("no truncate - $@", 6) if $@;
 
     is(-s "Iofs.tmp", 5, "truncation to five bytes");