From e18cbbc3b9582561da4ce5a8233fd92522f83f7b Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Thu, 16 Jan 2003 14:27:49 +0000 Subject: new steps window layout --- perl-install/steps.pm | 19 ++++++++++--------- 1 file changed, 10 insertions(+), 9 deletions(-) (limited to 'perl-install/steps.pm') diff --git a/perl-install/steps.pm b/perl-install/steps.pm index d1718aa55..83450d115 100644 --- a/perl-install/steps.pm +++ b/perl-install/steps.pm @@ -12,27 +12,28 @@ use common; #entered reachable toBeDone next done; my @installSteps = ( selectLanguage => [ N_("Choose your language"), 1, 1, '', '', 'language' ], - selectMouse => [ N_("Configure mouse"), 1, 1, '', '', 'mouse' ], - setupSCSI => [ N_("Hard drive detection"), 1, 0, '', '', 'harddrive' ], - selectInstallClass => [ N_("Select installation class"), 1, 1, '', '', '' ], - selectKeyboard => [ N_("Choose your keyboard"), 1, 1, '', "selectInstallClass", 'keyboard' ], + acceptLicense => [ N_("License"), 1, 1, '', '', '' ], + selectMouse => [ N_("Configure mouse"), 1, 1, '1', '', 'mouse' ], + setupSCSI => [ N_("Hard drive detection"), 1, 0, '1', '', 'harddrive' ], + selectInstallClass => [ N_("Select installation class"), 1, 1, '1', '', '' ], + selectKeyboard => [ N_("Choose your keyboard"), 1, 1, '1', "selectInstallClass", 'keyboard' ], miscellaneous => [ N_("Security"), 1, 1, '', '', 'security' ], - doPartitionDisks => [ N_("Setup filesystems"), 1, 0, '', "selectInstallClass", 'partition' ], - formatPartitions => [ N_("Format partitions"), 1, -1, '$o->{isUpgrade}', "doPartitionDisks", 'partition' ], + doPartitionDisks => [ N_("Partitioning"), 1, 0, '', "selectInstallClass", 'partition' ], + formatPartitions => [ N_("Format partitions"), 1, -1, '1', "doPartitionDisks", 'partition' ], choosePackages => [ N_("Choose packages to install"), 1, -2, '!$::expert', "formatPartitions", 'partition' ], installPackages => [ N_("Install system"), 1, -1, '', ["formatPartitions", "selectInstallClass"], '' ], setRootPassword => [ N_("Set root password"), 1, 1, '', "installPackages", 'rootpasswd' ], addUser => [ N_("Add a user"), 1, 1, '', "installPackages", 'user' ], - configureNetwork => [ N_("Configure networking"), 1, 1, '', "formatPartitions", 'network' ], + configureNetwork => [ N_("Configure networking"), 1, 1, '1', "formatPartitions", 'network' ], setupBootloader => [ N_("Install bootloader"), 1, 0, '', "installPackages", 'bootloader' ], - configureX => [ N_("Configure X"), 1, 1, '', ["formatPartitions", "setupBootloader"], 'X' ], + configureX => [ N_("Configure X"), 1, 1, '1', ["formatPartitions", "setupBootloader"], 'X' ], summary => [ N_("Summary"), 1, 0, '', "installPackages", 'summary' ], configureServices => [ N_("Configure services"), 1, 1, '!$::expert', "installPackages", 'services' ], if_(arch() !~ /alpha/ && arch() !~ /ppc/, createBootdisk => [ N_("Create a bootdisk"), 1, 0, '', "installPackages", 'bootdisk' ], ), installUpdates => [ N_("Install system updates"), 1, 1, '', ["installPackages", "configureNetwork", "summary"], '' ], - exitInstall => [ N_("Exit install"), 0, 0, '!$::expert && !$::live', '', 'exit' ], + exitInstall => [ N_("Exit install"), 0, 0, '', '', 'exit' ], ); for (my $i = 0; $i < @installSteps; $i += 2) { my %h; @h{@installStepsFields} = @{ $installSteps[$i + 1] }; -- cgit v1.2.1