Add pod spelling test
Dave Rolsky [Thu, 28 Jan 2010 17:59:15 +0000 (11:59 -0600)]
xt/pod-spell.t [new file with mode: 0644]

diff --git a/xt/pod-spell.t b/xt/pod-spell.t
new file mode 100644 (file)
index 0000000..5877bab
--- /dev/null
@@ -0,0 +1,64 @@
+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__
+APIs
+ActionClass
+Daisuke
+Daisuke
+Deserialize
+Deserializer
+Deserializing
+Doran
+Goulah
+JSON
+Laco
+Maki
+Maki
+Marchex
+Pearcey
+RESTful
+RESTful
+SERIALIZERS
+TT
+Wikipedia
+XHR
+XMLHttpRequest
+YAML
+conf
+deserialize
+deserialized
+deserializing
+fREW
+html
+http
+javascript
+jrockway
+mst
+namespace
+plugins
+request's
+serializer
+thusly
+wildcard