--- Text-SpellChecker-0.08/t/Text-SpellChecker.t.orig 2010-09-19 19:08:24.000000000 +0100 +++ Text-SpellChecker-0.08/t/Text-SpellChecker.t 2010-09-20 13:10:34.718160223 +0100 @@ -6,12 +6,6 @@ my $checker = Text::SpellChecker->new(text => "Foor score and seevn yeers ago"); ok($checker, 'object creation' ); -SKIP: { - skip 'Text::Aspell not installed', 4 unless $Text::SpellChecker::SpellersAvailable{Aspell}; - skip 'English dictionary not installed', 4 - unless (grep /^en/, Text::Aspell->new()->list_dictionaries) && - Text::Aspell->new()->get_option('lang') =~ /^en/; - ok($checker->next_word eq 'Foor', 'Catching English word'); ok($checker->next_word eq 'seevn', 'Iterator'); @@ -24,7 +18,6 @@ $checker->replace(new_word => 'seven'); ok($checker->text =~ /score and seven/, 'replacement'); -}; my $original = Text::SpellChecker->new(from_frozen => $checker->serialize); my $nother = Text::SpellChecker->new_from_frozen($checker->serialize);