From: Jerry D. Hedden <jdhedden@cpan.org>
Date: Tue, 27 Feb 2007 11:27:58 +0000 (-0800)
Subject: Skip tests if Encode not built
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=cd08456db360422d26e52ce6a0d3af4bffcae600;p=p5sagit%2Fp5-mst-13.2.git

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
--- 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
--- 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;