From: Father Chrysostomos <sprout@cpan.org>
Date: Sat, 14 Jan 2012 09:01:33 +0000 (-0800)
Subject: magic.t: Correct miniperl skip count
X-Git-Tag: accepted/trunk/20130322.191538~1180
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=afb8fe69e89b4df37c0b8e0f34fe1c4022450ff1;p=platform%2Fupstream%2Fperl.git

magic.t: Correct miniperl skip count
---

diff --git a/t/op/magic.t b/t/op/magic.t
index 9b43069..643eeb6 100644
--- a/t/op/magic.t
+++ b/t/op/magic.t
@@ -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(