This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
taint.t: Fix skip count
authorFather Chrysostomos <sprout@cpan.org>
Sun, 31 Aug 2014 20:39:57 +0000 (13:39 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Sun, 31 Aug 2014 21:12:54 +0000 (14:12 -0700)
t/op/taint.t

index 607402c..a7bccab 100644 (file)
@@ -1513,7 +1513,7 @@ SKIP: {
     }
 
     SKIP: {
-        skip "no Fcntl", 18 unless $has_fcntl;
+        skip "no Fcntl", 36 unless $has_fcntl;
 
        my $foo = tempfile();
        my $evil = $foo . $TAINT;