summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/any.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm
index 52d9b71f4..798e3b409 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -752,7 +752,7 @@ sub selectCountry {
$h->{country});
} @lang::locales;
@best == 1 and @best = ();
- $locale->{IM} = lang::get_default_im($locale->{lang});
+ $locale->{IM} ||= lang::get_default_im($locale->{lang});
my ($other, $ext_country);
member($country, @best) or ($ext_country, $country) = ($country, $ext_country);