summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--perl-install/lang.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/lang.pm b/perl-install/lang.pm
index e1ee01313..d1cde6002 100644
--- a/perl-install/lang.pm
+++ b/perl-install/lang.pm
@@ -956,7 +956,7 @@ sub langsLANGUAGE {
sub utf8_should_be_needed {
my ($locale) = @_;
- my @l = uniq(grep { $_ ne 'C' } map { l2charset($_) } langs($locale->{langs}));
+ my @l = uniq(grep { $_ ne 'C' } map { l2charset($_) } $locale->{lang}, langs($locale->{langs}));
@l > 1 || any { /utf|unicode/ } @l;
}