From 6ac26c2948ede4d2e24e732e66f0e5aeb785267e Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Fri, 30 Nov 2007 15:22:41 +0000
Subject: - localedrake:   o restrict the proposed input-methods for each
 language

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

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

diff --git a/perl-install/any.pm b/perl-install/any.pm
index efdc1b615..8c9dea9f3 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -1060,7 +1060,7 @@ sub selectCountry {
 		      list => [ @countries ], advanced => scalar(@best), changed => sub { $other = 1 } },
 		    { val => \$locale->{IM}, type => 'combo', label => N("Input method:"), 
 		      sort => 0, separator => '|',
-		      list => [ '', sort(lang::get_ims()) ], 
+		      list => [ '', lang::get_ims($locale->{lang}) ], 
 		      format => sub { $_[0] ? uc($_[0] =~ /(.*)\+(.*)/ ? "$1|$1+$2" : $_[0]) : N("None") },
 		      advanced => !$locale->{IM},
 		    },
-- 
cgit v1.2.1