add a bunch of author-only tests

[gitmo/MooseX-Singleton.git] / xt / pod-spell.t

diff --git a/xt/pod-spell.t b/xt/pod-spell.t
new file mode 100644 (file)
index 0000000..ca2739f
--- /dev/null
+++ b/xt/pod-spell.t
@@ -0,0 +1,19 @@
+use strict;
+use warnings;
+
+use Test::Spelling;
+
+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');
+all_pod_files_spelling_ok;
+
+__DATA__
+metaclass
+SIGNES