nuking pod tests

diff --git a/Equinox-Migration/t/03-MapDrivenMARCXMLProc.t b/Equinox-Migration/t/03-MapDrivenMARCXMLProc.t
index baf880f..3c3540c 100644 (file)
--- a/Equinox-Migration/t/03-MapDrivenMARCXMLProc.t
+++ b/Equinox-Migration/t/03-MapDrivenMARCXMLProc.t
@@ -2,10 +2,9 @@
 
 #use Test::More tests => 39;
 use Test::More qw(no_plan);
-#use Equinox::Migration::MapDrivenXMLProc;
-is (1,1);
-exit;
+use Equinox::Migration::MapDrivenXMLProc;
+
 # baseline object creation
-#my $sm = Equinox::Migration::MapDrivenXMLProc->new();
-#is(ref $sm, "Equinox::Migration::MapDrivenXMLProc", "self is self");
+my $sm = Equinox::Migration::MapDrivenXMLProc->new();
+is(ref $sm, "Equinox::Migration::MapDrivenXMLProc", "self is self");
 

diff --git a/Equinox-Migration/t/pod-coverage.t b/Equinox-Migration/t/pod-coverage.t
deleted file mode 100644 (file)
index fc40a57..0000000
--- a/Equinox-Migration/t/pod-coverage.t
+++ /dev/null
@@ -1,18 +0,0 @@
-use strict;
-use warnings;
-use Test::More;
-
-# Ensure a recent version of Test::Pod::Coverage
-my $min_tpc = 1.08;
-eval "use Test::Pod::Coverage $min_tpc";
-plan skip_all => "Test::Pod::Coverage $min_tpc required for testing POD coverage"
-    if $@;
-
-# Test::Pod::Coverage doesn't require a minimum Pod::Coverage version,
-# but older versions don't recognize some common documentation styles
-my $min_pc = 0.18;
-eval "use Pod::Coverage $min_pc";
-plan skip_all => "Pod::Coverage $min_pc required for testing POD coverage"
-    if $@;
-
-all_pod_coverage_ok();

diff --git a/Equinox-Migration/t/pod.t b/Equinox-Migration/t/pod.t
deleted file mode 100644 (file)
index ee8b18a..0000000
--- a/Equinox-Migration/t/pod.t
+++ /dev/null
@@ -1,12 +0,0 @@
-#!perl -T
-
-use strict;
-use warnings;
-use Test::More;
-
-# Ensure a recent version of Test::Pod
-my $min_tp = 1.22;
-eval "use Test::Pod $min_tp";
-plan skip_all => "Test::Pod $min_tp required for testing POD" if $@;
-
-all_pod_files_ok();