Fix skip count for B using tests in PerlIO::Scalar
authorDavid Leadbeater <dgl@dgl.cx>
Sun, 12 Feb 2012 21:54:41 +0000 (13:54 -0800)
committerFather Chrysostomos <sprout@cpan.org>
Sun, 12 Feb 2012 21:55:27 +0000 (13:55 -0800)
ext/PerlIO-scalar/t/scalar.t

index 2046e54..a02107b 100644 (file)
@@ -340,7 +340,7 @@ sub has_trailing_nul(\$) {
 }
 SKIP: {
     if ($Config::Config{'extensions'} !~ m!\bPerlIO/scalar\b!) {
-       skip "no B", 1;
+       skip "no B", 3;
     }
     require B;