summaryrefslogtreecommitdiffstats
path: root/perl-install/install2.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2000-04-15 21:31:11 +0000
committerPascal Rigaux <pixel@mandriva.com>2000-04-15 21:31:11 +0000
commit9cdb9f0d0ea484f8454be24d94a4e179138c70b8 (patch)
treee8fef59b2d476a8aba48a1edf828888ec9e87df6 /perl-install/install2.pm
parentfb2657dc463c4f3053ba243654aa1271ffa4588c (diff)
downloaddrakx-9cdb9f0d0ea484f8454be24d94a4e179138c70b8.tar
drakx-9cdb9f0d0ea484f8454be24d94a4e179138c70b8.tar.gz
drakx-9cdb9f0d0ea484f8454be24d94a4e179138c70b8.tar.bz2
drakx-9cdb9f0d0ea484f8454be24d94a4e179138c70b8.tar.xz
drakx-9cdb9f0d0ea484f8454be24d94a4e179138c70b8.zip
no_comment
Diffstat (limited to 'perl-install/install2.pm')
-rw-r--r--perl-install/install2.pm8
1 files changed, 5 insertions, 3 deletions
diff --git a/perl-install/install2.pm b/perl-install/install2.pm
index 75a3f5fdb..152180a84 100644
--- a/perl-install/install2.pm
+++ b/perl-install/install2.pm
@@ -42,7 +42,7 @@ my (%installSteps, @orderedInstallSteps);
my @installSteps = (
selectLanguage => [ __("Choose your language"), 1, 1, '' ],
selectInstallClass => [ __("Select installation class"), 1, 1, '' ],
- setupSCSI => [ __("Setup SCSI"), 1, 0, '' ],
+ setupSCSI => [ __("Hard drive detection"), 1, 0, '' ],
selectMouse => [ __("Configure mouse"), 1, 1, 'beginner', "selectInstallClass" ],
selectKeyboard => [ __("Choose your keyboard"), 1, 1, '', "selectInstallClass" ],
miscellaneous => [ __("Miscellaneous"), 1, 1, 'beginner' ],
@@ -145,7 +145,7 @@ $o = $::o = {
#- security => 2,
shells => [ map { "/bin/$_" } qw(bash tcsh zsh ash ksh) ],
authentication => { md5 => 1, shadow => 1 },
- lang => 'fr_FR',
+ lang => 'en',
isUpgrade => 0,
toRemove => [],
toSave => [],
@@ -502,7 +502,7 @@ sub main {
$::beginner = $::expert = $::g_auto_install = 0;
- c::unlimit_core();
+ c::unlimit_core() unless $::testing;
my ($cfg, $patch);
my %cmdline; map {
@@ -651,6 +651,8 @@ sub main {
eval { modules::load("af_packet") };
+ lang::set($o->{lang}, $o->{langs});
+
#-the main cycle
my $clicked = 0;
MAIN: for ($o->{step} = $o->{steps}{first};; $o->{step} = getNextStep()) {