Permalink
Browse files

Moving things that should be in xt to xt

  • Loading branch information...
1 parent 7ae8e2f commit 9d7f5a16813afcc7b466d8a1191302694da8b82d @obra obra committed May 5, 2009
Showing with 20 additions and 0 deletions.
  1. 0 {t → xt}/00-dependencies.t
  2. +15 −0 xt/99-pod-coverage.t
  3. +5 −0 xt/99-pod.t
File renamed without changes.
View
@@ -0,0 +1,15 @@
+use Test::More;
+eval "use Test::Pod::Coverage 1.00";
+plan skip_all => "Test::Pod::Coverage 1.00 required for testing POD coverage" if $@;
+plan skip_all => "Coverage tests only run for authors" unless ( -d 'inc/.author' );
+plan skip_all => "We know our coverage is bad :(";
+
+all_pod_coverage_ok();
+
+# Workaround for dumb bug (fixed in 5.8.7) where Test::Builder thinks that
+# certain "die"s that happen inside evals are not actually inside evals,
+# because caller() is broken if you turn on $^P like Module::Refresh does
+#
+# (I mean, if we've gotten to this line, then clearly the test didn't die, no?)
+Test::Builder->new->{Test_Died} = 0;
+
View
@@ -0,0 +1,5 @@
+use Test::More;
+eval "use Test::Pod 1.00";
+plan skip_all => "Test::Pod 1.00 required for testing POD" if $@;
+all_pod_files_ok();
+

0 comments on commit 9d7f5a1

Please sign in to comment.