From: Dave Rolsky <autarch@urth.org>
Date: Sun, 4 Apr 2010 02:11:13 +0000 (-0500)
Subject: update author tests and move them to xt
X-Git-Tag: v0.09~14
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMooseX-StrictConstructor.git;a=commitdiff_plain;h=2a9c7c3878b5d387c16af48c1010d8a1bcc41003

update author tests and move them to xt
---

diff --git a/t/pod-coverage.t b/t/pod-coverage.t
deleted file mode 100644
index af03b37..0000000
--- a/t/pod-coverage.t
+++ /dev/null
@@ -1,13 +0,0 @@
-use strict;
-use warnings;
-
-use Test::More;
-
-plan skip_all => 'This test is only run for the module author'
-    unless -d '.svn' || $ENV{IS_MAINTAINER};
-
-eval "use Test::Pod::Coverage 1.04";
-plan skip_all => "Test::Pod::Coverage 1.04 required for testing POD coverage"
-    if $@;
-
-all_pod_coverage_ok( { trustme => [qr/init_meta/] } );
diff --git a/t/pod.t b/t/pod.t
deleted file mode 100644
index f37ed3e..0000000
--- a/t/pod.t
+++ /dev/null
@@ -1,12 +0,0 @@
-use strict;
-use warnings;
-
-use Test::More;
-
-plan skip_all => 'This test is only run for the module author'
-    unless -d '.svn' || $ENV{IS_MAINTAINER};
-
-eval "use Test::Pod 1.14";
-plan skip_all => "Test::Pod 1.14 required for testing POD" if $@;
-
-all_pod_files_ok();
diff --git a/xt/kwalitee.t b/xt/kwalitee.t
new file mode 100644
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
new file mode 100644
index 0000000..c7f97f9
--- /dev/null
+++ b/xt/pod-coverage.t
@@ -0,0 +1,10 @@
+use strict;
+use warnings;
+
+use Test::More;
+
+eval "use Test::Pod::Coverage 1.04";
+plan skip_all => "Test::Pod::Coverage 1.04 required for testing POD coverage"
+    if $@;
+
+all_pod_coverage_ok();
diff --git a/xt/pod-spell.t b/xt/pod-spell.t
new file mode 100644
index 0000000..63d9a3e
--- /dev/null
+++ b/xt/pod-spell.t
@@ -0,0 +1,26 @@
+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__
+PayPal
diff --git a/xt/pod.t b/xt/pod.t
new file mode 100644
index 0000000..69d8e60
--- /dev/null
+++ b/xt/pod.t
@@ -0,0 +1,9 @@
+use strict;
+use warnings;
+
+use Test::More;
+
+eval "use Test::Pod 1.14";
+plan skip_all => "Test::Pod 1.14 required for testing POD" if $@;
+
+all_pod_files_ok();