Committed by =?UTF-8?q?Dagfinn=20Ilmari=20Manns=C3=A5ker?= <[email protected]>
Subject: [DBD::Pg 1/2] Explicitly specify en_US for spell checking
---
t/99_spellcheck.t | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/t/99_spellcheck.t b/t/99_spellcheck.t
index f4a7d14..e1b86cb 100644
--- a/t/99_spellcheck.t
+++ b/t/99_spellcheck.t
@@ -39,7 +39,7 @@ while (<DATA>) {
sub spellcheck {
my ($desc, $text, $filename) = @_;
- my $check = Text::SpellChecker->new(text => $text);
+ my $check = Text::SpellChecker->new(text => $text, lang => 'en_US');
my %badword;
while (my $word = $check->next_word) {
next if $okword{Common}{$word} or $okword{$filename}{$word};
--
1.8.4