summaryrefslogtreecommitdiffstats
path: root/perl-install/lang.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2003-10-01 14:34:00 +0000
committerPascal Rigaux <pixel@mandriva.com>2003-10-01 14:34:00 +0000
commit2bcf257104b6572bf0b940b1f06970588f8a1bad (patch)
tree2f58d346bacd27853a6ee189167511412b014619 /perl-install/lang.pm
parentc78eefb7c54a8329e2caf31cc34178357c198f9b (diff)
downloaddrakx-2bcf257104b6572bf0b940b1f06970588f8a1bad.tar
drakx-2bcf257104b6572bf0b940b1f06970588f8a1bad.tar.gz
drakx-2bcf257104b6572bf0b940b1f06970588f8a1bad.tar.bz2
drakx-2bcf257104b6572bf0b940b1f06970588f8a1bad.tar.xz
drakx-2bcf257104b6572bf0b940b1f06970588f8a1bad.zip
perl_checker compliance
Diffstat (limited to 'perl-install/lang.pm')
-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 a05706914..e5f35fb31 100644
--- a/perl-install/lang.pm
+++ b/perl-install/lang.pm
@@ -836,7 +836,7 @@ sub langs_selected {
my ($locale) = @_;
#- adding the UTF-8 flag (if not forced) depends on the selected languages
$locale->{utf8} ||= l2charset($locale->{lang}) =~ /utf|unicode/
- || (uniq(grep { $_ ne 'C' } map { l2charset($_) } langs($locale->{langs}))) > 1;
+ || uniq(grep { $_ ne 'C' } map { l2charset($_) } langs($locale->{langs})) > 1;
}
sub pack_langs {