Skip tests if Encode not built

From: "Jerry D. Hedden" <jdhedden@yahoo.com>
Message-ID: <176638.9767.qm@web30207.mail.mud.yahoo.com>

p4raw-id: //depot/perl@30419

diff --git a/lib/Pod/Simple/t/corpustest.t b/lib/Pod/Simple/t/corpustest.t
index b37f77c..291edd6 100644 (file)
--- a/lib/Pod/Simple/t/corpustest.t
+++ b/lib/Pod/Simple/t/corpustest.t
@@ -3,6 +3,12 @@ BEGIN {
         chdir 't';
         @INC = '../lib';
     }
+
+    use Config;
+    if ($Config::Config{'extensions'} !~ /\bEncode\b/) {
+      print "1..0 # Skip: Encode was not built\n";
+      exit 0;
+    }
 }
 
 #use Pod::Simple::Debug (10);

diff --git a/lib/encoding/warnings/t/4-lexical.t b/lib/encoding/warnings/t/4-lexical.t
index 5031cf3..e80c504 100644 (file)
--- a/lib/encoding/warnings/t/4-lexical.t
+++ b/lib/encoding/warnings/t/4-lexical.t
@@ -1,6 +1,14 @@
 use strict;
 use Test;
-BEGIN { plan tests => 3 }
+BEGIN {
+    use Config;
+    if ($Config::Config{'extensions'} !~ /\bEncode\b/) {
+      print "1..0 # Skip: Encode was not built\n";
+      exit 0;
+    }
+
+    plan tests => 3;
+}
 
 {
     use encoding::warnings;