diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2003-10-01 14:34:00 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2003-10-01 14:34:00 +0000 |
commit | 2bcf257104b6572bf0b940b1f06970588f8a1bad (patch) | |
tree | 2f58d346bacd27853a6ee189167511412b014619 /perl-install | |
parent | c78eefb7c54a8329e2caf31cc34178357c198f9b (diff) | |
download | drakx-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')
-rw-r--r-- | perl-install/lang.pm | 2 |
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 { |