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 Reis
  27 ActionRole
  28 de
  29 Gerv
  30 Newell
  31 Wiki
  32 json
  33 APIs
  34 ActionClass
  35 Daisuke
  36 Daisuke
  37 Deserialize
  38 Deserializer
  39 Deserializing
  40 Doran
  41 Goulah
  42 JSON
  43 Laco
  44 Maki
  45 Maki
  46 Marchex
  47 Multipart
  48 Pearcey
  49 Rolsky
  50 RESTful
  51 RESTful
  52 SERIALIZERS
  53 TT
  54 Wikipedia
  55 XHR
  56 XMLHttpRequest
  57 YAML
  58 conf
  59 deserialization
  60 deserialize
  61 deserialized
  62 deserializing
  63 fREW
  64 html
  65 http
  66 javascript
  67 jrockway
  68 mst
  69 multipart
  70 namespace
  71 plugins
  72 request's
  73 serializer
  74 thusly
  75 wildcard
  76 subclasses
  77 Axel
  78 URI