From 4059602c5cf6750fbe2f15ecb6c1dd171bbc94bc Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Wed, 11 Oct 2000 09:58:39 +0000
Subject:         * (selectKeyboard): set default $o->{langs} to $o->{lang}

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

diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm
index a3d24602e..8bd1f5a87 100644
--- a/perl-install/install_steps_interactive.pm
+++ b/perl-install/install_steps_interactive.pm
@@ -160,7 +160,7 @@ sub selectKeyboard($) {
 
     if ($::expert && ref($o) !~ /newt/) { #- newt is buggy with big windows :-(
 	$o->set_help('selectLangs');
-	$o->{langs} ||= [];
+	$o->{langs} ||= [ $o->{lang} ];
 	my $all = $o->{langs}[0] eq 'all';
 	$o->{langs} = $o->ask_many_from_list('',
 			       _("You can choose other languages that will be available after install"),			       
-- 
cgit v1.2.1