From 2bcf257104b6572bf0b940b1f06970588f8a1bad Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Wed, 1 Oct 2003 14:34:00 +0000
Subject: perl_checker compliance

---
 perl-install/lang.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install/lang.pm')

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 { 
-- 
cgit v1.2.1