magic.t: Correct miniperl skip count
authorFather Chrysostomos <sprout@cpan.org>
Sat, 14 Jan 2012 09:01:33 +0000 (01:01 -0800)
committerFather Chrysostomos <sprout@cpan.org>
Sat, 14 Jan 2012 09:01:33 +0000 (01:01 -0800)
t/op/magic.t

index 9b43069..643eeb6 100644 (file)
@@ -547,7 +547,7 @@ foreach my $sig (qw(__DIE__ _BOGUS_HOOK KILL THIRSTY)) {
 
 # %+ %-
 SKIP: {
-    skip_if_miniperl("No XS in miniperl", 3);
+    skip_if_miniperl("No XS in miniperl", 2);
     # Make sure defined(*{"+"}) before %+ does not stop %+ from working
     is
       runperl(