| Subject: | [PATCH] Explicitly specify en_US for spell checking |
| Date: | Thu, 2 Jan 2014 21:18:39 +0100 |
| To: | bug-DBD-Pg [...] rt.cpan.org |
| From: | Dagfinn Ilmari Mannsåker <ilmari [...] ilmari.org> |
Text::SpellChecker by default respects $LANG if set, so we need to make
sure to override that, since the manual is in US English.
---
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.3.2