root/lang/perl/App-Starter/trunk/t/spelling.t @ 9000

Revision 9000, 0.5 kB (checked in by tomyhero, 6 years ago)

lang/perl/App-Starter : fix spelling for pl file

Line 
1use Test::More;
2use Test::Spelling;
3$ENV{LANG} = 'C';
4
5my $spell_cmd;
6foreach my $path (split(/:/, $ENV{PATH})) {
7    -x "$path/spell"  and $spell_cmd="spell", last;
8    -x "$path/ispell" and $spell_cmd="ispell -l", last;
9    -x "$path/aspell" and $spell_cmd="aspell list", last;
10}
11$ENV{SPELL_CMD} and $spell_cmd = $ENV{SPELL_CMD};
12$spell_cmd or plan skip_all => "no spell/ispell/aspell";
13set_spell_cmd($spell_cmd);
14
15add_stopwords(<DATA>);
16all_pod_files_spelling_ok();
17
18__END__
19Tomohiro
20Teranishi
21dann
22dir
23app
24pl
Note: See TracBrowser for help on using the browser.