From 901f3f8e24d58d0d1d553c4424b8bdb3e84440b7 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Tue, 18 Mar 2008 15:41:25 +0000 Subject: - fix setting default lang (which is given by gfxboot) nb: one must not set $o->{locale}{lang} directly, otherwise $o->{locale}{country} will not have a valid value, hence some issues... --- perl-install/install/steps.pm | 2 -- 1 file changed, 2 deletions(-) (limited to 'perl-install/install/steps.pm') diff --git a/perl-install/install/steps.pm b/perl-install/install/steps.pm index 6eee0a30b..555fc9254 100644 --- a/perl-install/install/steps.pm +++ b/perl-install/install/steps.pm @@ -103,8 +103,6 @@ sub kill_action {} sub selectLanguage { my ($o) = @_; - #- for auto_install compatibility with old $o->{lang} - $o->{locale} = lang::system_locales_to_ourlocale($o->{lang}, $o->{lang}) if $o->{lang}; $o->{locale}{langs} ||= { $o->{locale}{lang} => 1 }; if (!exists $o->{locale}{country}) { -- cgit v1.2.1