From 394604fb59bb2d2d84093bc373fa98c25843e4ac Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Thu, 9 Sep 2004 08:36:25 +0000
Subject: (selectCountry) do not default to per locale default IM.  IM was
 either setup by drakx or by localedrake.  If the field does not exists, this
 means the user *decided* to not have an IM.

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

(limited to 'perl-install')

diff --git a/perl-install/any.pm b/perl-install/any.pm
index 798e3b409..30436d9d5 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -752,7 +752,6 @@ sub selectCountry {
 	    $h->{country});
     } @lang::locales;
     @best == 1 and @best = ();
-    $locale->{IM} ||= lang::get_default_im($locale->{lang});
 
     my ($other, $ext_country);
     member($country, @best) or ($ext_country, $country) = ($country, $ext_country);
-- 
cgit v1.2.1