From: Chris Nehren <apeiron@cpan.org>
Date: Sun, 4 Sep 2011 07:29:02 +0000 (-0400)
Subject: More tests are a good thing
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit%2FPromulger.git;a=commitdiff_plain;h=ab99b6022a1f349bc0cd356b5a52b554a57c3f4e

More tests are a good thing
---

diff --git a/Changes b/Changes
new file mode 100644
index 0000000..48b8fbf
--- /dev/null
+++ b/Changes
@@ -0,0 +1,4 @@
+Revision history for Promulger
+0.000001 2011-sometime
+
+  - First true public release
diff --git a/t/kwalitee.t b/t/kwalitee.t
new file mode 100644
index 0000000..58141cb
--- /dev/null
+++ b/t/kwalitee.t
@@ -0,0 +1,8 @@
+#!/usr/bin/perl
+use strictures 1;
+use autodie;
+use Test::Most;
+
+eval { require Test::Kwalitee; Test::Kwalitee->import() };
+
+plan( skip_all => 'Test::Kwalitee not installed; skipping' ) if $@;
diff --git a/t/manifest.t b/t/manifest.t
new file mode 100644
index 0000000..52ca87d
--- /dev/null
+++ b/t/manifest.t
@@ -0,0 +1,12 @@
+#!/usr/bin/perl
+use strictures 1;
+use autodie;
+use Test::Most;
+
+unless ( $ENV{RELEASE_TESTING} ) {
+    plan( skip_all => "Author tests not required for installation" );
+}
+
+eval "use Test::CheckManifest 0.9";
+plan skip_all => "Test::CheckManifest 0.9 required" if $@;
+ok_manifest();
diff --git a/t/pod-coverage.t b/t/pod-coverage.t
new file mode 100644
index 0000000..9672575
--- /dev/null
+++ b/t/pod-coverage.t
@@ -0,0 +1,18 @@
+use strictures 1;
+use autodie;
+use Test::Most;
+
+# 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/t/pod.t b/t/pod.t
new file mode 100644
index 0000000..3656669
--- /dev/null
+++ b/t/pod.t
@@ -0,0 +1,11 @@
+#!/usr/bin/perl
+use strictures 1;
+use autodie;
+use Test::Most;
+
+# 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();