#!/usr/bin/env perl
# $URL: http://perlcritic.tigris.org/svn/perlcritic/trunk/Task-Perl-Critic/xt/author/97_spelling.t $
# $Date: 2008-06-08 21:46:45 -0500 (Sun, 08 Jun 2008) $
# $Author: clonezone $
# $Revision: 2431 $
use strict;
use warnings;
use Test::More;
if ( ! -d '.svn' && ! $ENV{TEST_AUTHOR} ) {
plan skip_all => 'Author test. Set $ENV{TEST_AUTHOR} to a true value to run.';
}
my $aspell_path = eval q{use Test::Spelling; use File::Which;
which('aspell') || die 'no aspell';};
plan skip_all => 'Optional Test::Spelling, File::Which and aspell program required to spellcheck POD' if $@;
add_stopwords(<DATA>);
set_spell_cmd("$aspell_path list");
all_pod_files_spelling_ok();
__DATA__