From cf8f2d01244a93ffd433d1824e9728ef3b0329b0 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Fri, 3 Jun 2005 04:02:56 +0000
Subject: don't use $in->{locale} as being $o->{locale} during install, it's
 much better to pass $o->{locale}

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

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

diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm
index 460e489f8..63f2df1a1 100644
--- a/perl-install/install_steps_interactive.pm
+++ b/perl-install/install_steps_interactive.pm
@@ -50,7 +50,7 @@ sub kill_action {
 sub selectLanguage {
     my ($o) = @_;
 
-    $o->{locale}{lang} = any::selectLanguage($o, $o->{locale}{lang}, $o->{locale}{langs} ||= {});
+    any::selectLanguage_install($o, $o->{locale});
     install_steps::selectLanguage($o);
 
     if ($o->isa('interactive::gtk')) {
-- 
cgit v1.2.1