summaryrefslogtreecommitdiffstats
path: root/perl-install/install_steps.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2000-10-08 22:48:45 +0000
committerPascal Rigaux <pixel@mandriva.com>2000-10-08 22:48:45 +0000
commit3a2974725a88f90678ca80ec5fed0cad8a7ae73f (patch)
tree78dc2f731d04199de3a78156562402cbc9066c44 /perl-install/install_steps.pm
parentb96eaf258df93474108357edc2473a76f630bd52 (diff)
downloaddrakx-3a2974725a88f90678ca80ec5fed0cad8a7ae73f.tar
drakx-3a2974725a88f90678ca80ec5fed0cad8a7ae73f.tar.gz
drakx-3a2974725a88f90678ca80ec5fed0cad8a7ae73f.tar.bz2
drakx-3a2974725a88f90678ca80ec5fed0cad8a7ae73f.tar.xz
drakx-3a2974725a88f90678ca80ec5fed0cad8a7ae73f.zip
no_comment
Diffstat (limited to 'perl-install/install_steps.pm')
-rw-r--r--perl-install/install_steps.pm3
1 files changed, 1 insertions, 2 deletions
diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm
index 5934476c4..f0d82694d 100644
--- a/perl-install/install_steps.pm
+++ b/perl-install/install_steps.pm
@@ -87,7 +87,6 @@ sub set_help { 1 }
sub selectLanguage {
my ($o) = @_;
lang::set($o->{lang});
- $o->{langs} ||= [ $o->{lang} ];
if ($o->{keyboard_unsafe} || !$o->{keyboard}) {
$o->{keyboard_unsafe} = 1;
@@ -99,7 +98,7 @@ sub selectLanguage {
sub selectKeyboard {
my ($o) = @_;
keyboard::setup($o->{keyboard});
- lang::set_langs($o->{langs});
+ lang::set_langs($o->{langs} || [ $o->{lang} ]);
}
#------------------------------------------------------------------------------
sub selectPath {}