diff options
author | Tom Ryder <tom@sanctum.geek.nz> | 2017-10-04 23:25:52 +1300 |
---|---|---|
committer | Tom Ryder <tom@sanctum.geek.nz> | 2017-10-04 23:25:52 +1300 |
commit | 6d865c0038ca3a2abbc15926749ea4ae1b96a9b2 (patch) | |
tree | 2e371af27216c4a4ec69108a2a46799c3f067802 | |
parent | Add Changes to MANIFEST, too (diff) | |
download | List-Breakdown-6d865c0038ca3a2abbc15926749ea4ae1b96a9b2.tar.gz List-Breakdown-6d865c0038ca3a2abbc15926749ea4ae1b96a9b2.zip |
Move some author testing into xt
I like the POD and MANIFEST author tests that module-starter(1p) made
for me, but I don't like the env variable invocation for them much. I've
put them in xt instead so I can do `prove xt`.
-rw-r--r-- | MANIFEST | 3 | ||||
-rw-r--r-- | xt/manifest.t | 11 | ||||
-rw-r--r-- | xt/pod-coverage.t | 20 | ||||
-rw-r--r-- | xt/pod.t | 12 |
4 files changed, 46 insertions, 0 deletions
@@ -5,3 +5,6 @@ MANIFEST README t/errors.t t/words.t +xt/manifest.t +xt/pod-coverage.t +xt/pod.t diff --git a/xt/manifest.t b/xt/manifest.t new file mode 100644 index 0000000..9df8859 --- /dev/null +++ b/xt/manifest.t @@ -0,0 +1,11 @@ +#!perl -T +use 5.006; +use strict; +use warnings; +use Test::More; + +my $min_tcm = 0.9; +eval "use Test::CheckManifest $min_tcm"; +plan skip_all => "Test::CheckManifest $min_tcm required" if $@; + +ok_manifest(); diff --git a/xt/pod-coverage.t b/xt/pod-coverage.t new file mode 100644 index 0000000..1b874ca --- /dev/null +++ b/xt/pod-coverage.t @@ -0,0 +1,20 @@ +#!perl -T +use 5.006; +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/xt/pod.t b/xt/pod.t new file mode 100644 index 0000000..cf2dce4 --- /dev/null +++ b/xt/pod.t @@ -0,0 +1,12 @@ +#!perl -T +use 5.006; +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(); |