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