From c6e41a0a54eceb66483226532b3eb8e032541e26 Mon Sep 17 00:00:00 2001
From: Karl Williamson <khw@cpan.org>
Date: Sat, 2 Nov 2019 21:18:03 -0600
Subject: D:P: Change to use modern skip functionality

The new skip() has a count of tests.  Previously you had to loop
yourself.
---
 dist/Devel-PPPort/parts/inc/magic | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

(limited to 'dist/Devel-PPPort/parts/inc/magic')

diff --git a/dist/Devel-PPPort/parts/inc/magic b/dist/Devel-PPPort/parts/inc/magic
index bf1a2f391b..9a4f31af1d 100644
--- a/dist/Devel-PPPort/parts/inc/magic
+++ b/dist/Devel-PPPort/parts/inc/magic
@@ -624,9 +624,7 @@ ok(Devel::PPPort::sv_magic_portable($foo));
 ok($foo eq 'bar');
 
 if ( "$]" < '5.007003' ) {
-    for (1..22) {
-        skip 'skip: no SV_NOSTEAL support', 0;
-    }
+    skip 'skip: no SV_NOSTEAL support', 22;
 } else {
     tie my $scalar, 'TieScalarCounter', 10;
     my $fetch = $scalar;
-- 
cgit v1.2.1