xt/pod-spell.t

   1 use strict;
   2 use warnings;
   3
   4 use Test::More;
   5
   6 eval "use Test::Spelling";
   7 plan skip_all => "Test::Spelling required for testing POD coverage"
   8     if $@;
   9
  10 my @stopwords;
  11 for (<DATA>) {
  12     chomp;
  13     push @stopwords, $_
  14         unless /\A (?: \# | \s* \z)/msx;    # skip comments, whitespace
  15 }
  16
  17 add_stopwords(@stopwords);
  18 set_spell_cmd('aspell list -l en');
  19
  20 # This prevents a weird segfault from the aspell command - see
  21 # https://bugs.launchpad.net/ubuntu/+source/aspell/+bug/71322
  22 local $ENV{LC_ALL} = 'C';
  23 all_pod_files_spelling_ok();
  24
  25 __DATA__
  26 Wiki
  27 json
  28 APIs
  29 ActionClass
  30 Daisuke
  31 Daisuke
  32 Deserialize
  33 Deserializer
  34 Deserializing
  35 Doran
  36 Goulah
  37 JSON
  38 Laco
  39 Maki
  40 Maki
  41 Marchex
  42 Multipart
  43 Pearcey
  44 Rolsky
  45 RESTful
  46 RESTful
  47 SERIALIZERS
  48 TT
  49 Wikipedia
  50 XHR
  51 XMLHttpRequest
  52 YAML
  53 conf
  54 deserialization
  55 deserialize
  56 deserialized
  57 deserializing
  58 fREW
  59 html
  60 http
  61 javascript
  62 jrockway
  63 mst
  64 multipart
  65 namespace
  66 plugins
  67 request's
  68 serializer
  69 thusly
  70 wildcard
  71 subclasses
  72 Axel
  73 URI