update/add author tests

diff --git a/xt/kwalitee.t b/xt/kwalitee.t
new file mode 100644 (file)
index 0000000..72b6988
--- /dev/null
+++ b/xt/kwalitee.t
@@ -0,0 +1,8 @@
+use strict;
+use warnings;
+
+use Test::More;
+
+eval { require Test::Kwalitee; Test::Kwalitee->import() };
+plan skip_all => "Test::Kwalitee needed for testing kwalitee"
+    if $@;

diff --git a/xt/pod_coverage.t b/xt/pod-coverage.t
similarity index 100%
rename from xt/pod_coverage.t
rename to xt/pod-coverage.t

diff --git a/xt/pod-spell.t b/xt/pod-spell.t
new file mode 100644 (file)
index 0000000..cd0934d
--- /dev/null
+++ b/xt/pod-spell.t
@@ -0,0 +1,30 @@
+use strict;
+use warnings;
+
+use Test::More;
+
+eval "use Test::Spelling";
+plan skip_all => "Test::Spelling required for testing POD coverage"
+    if $@;
+
+my @stopwords;
+for (<DATA>) {
+    chomp;
+    push @stopwords, $_
+        unless /\A (?: \# | \s* \z)/msx;    # skip comments, whitespace
+}
+
+add_stopwords(@stopwords);
+set_spell_cmd('aspell list -l en');
+
+# This prevents a weird segfault from the aspell command - see
+# https://bugs.launchpad.net/ubuntu/+source/aspell/+bug/71322
+local $ENV{LC_ALL} = 'C';
+all_pod_files_spelling_ok();
+
+__DATA__
+Stevan
+cpan
+isa
+param
+subname

diff --git a/xt/pod.t b/xt/pod.t
index 4ae1af3..69d8e60 100644 (file)
--- a/xt/pod.t
+++ b/xt/pod.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 use warnings;