Skip test when Encode isn't built

(noticed by Jerry D. Hedden)

p4raw-id: //depot/perl@30370

diff --git a/ext/PerlIO/encoding/t/nolooping.t b/ext/PerlIO/encoding/t/nolooping.t
index f3436ad..846a248 100644 (file)
--- a/ext/PerlIO/encoding/t/nolooping.t
+++ b/ext/PerlIO/encoding/t/nolooping.t
@@ -1,5 +1,13 @@
 #!perl -w
 
+BEGIN {
+    use Config;
+    if ($Config{extensions} !~ /\bEncode\b/) {
+       print "1..0 # Skip: no Encode\n";
+       exit 0;
+    }
+}
+
 use Test::More tests => 1;
 
 BEGIN {