diff options
author | Antoine Ginies <aginies@mandriva.com> | 2004-10-15 12:03:50 +0000 |
---|---|---|
committer | Antoine Ginies <aginies@mandriva.com> | 2004-10-15 12:03:50 +0000 |
commit | ad5d38d7ef866d4acca9f0b554fe6e7c9c23e341 (patch) | |
tree | 5b1ddde0eb614e1383071adae79207e9be971430 /cluster/data/steps.pm | |
parent | 0d3884e06f2cad55beecf42b73d753807f72e67d (diff) | |
download | drakx-backup-do-not-use-ad5d38d7ef866d4acca9f0b554fe6e7c9c23e341.tar drakx-backup-do-not-use-ad5d38d7ef866d4acca9f0b554fe6e7c9c23e341.tar.gz drakx-backup-do-not-use-ad5d38d7ef866d4acca9f0b554fe6e7c9c23e341.tar.bz2 drakx-backup-do-not-use-ad5d38d7ef866d4acca9f0b554fe6e7c9c23e341.tar.xz drakx-backup-do-not-use-ad5d38d7ef866d4acca9f0b554fe6e7c9c23e341.zip |
needed file for mdkc
Diffstat (limited to 'cluster/data/steps.pm')
-rw-r--r-- | cluster/data/steps.pm | 47 |
1 files changed, 47 insertions, 0 deletions
diff --git a/cluster/data/steps.pm b/cluster/data/steps.pm new file mode 100644 index 000000000..7b4f0942b --- /dev/null +++ b/cluster/data/steps.pm @@ -0,0 +1,47 @@ +package steps; + +use strict; +use vars qw(%installSteps @orderedInstallSteps); +use common; + +#-###################################################################################### +#- Steps table +#-###################################################################################### +{ + my @installStepsFields = qw(text redoable onError hidden needs); + #entered reachable toBeDone next done; + my @installSteps = ( + selectLanguage => [ N_("Language"), 1, 1, '', '' ], + acceptLicense => [ N_("License"), 1, -1, '', '' ], + selectMouse => [ N_("Configure mouse"), 1, 1, '1', '' ], + setupSCSI => [ N_("Hard drive detection"), 1, 0, '1', '' ], + selectInstallClass => [ N_("Select installation class"), 1, 1, '1', '' ], + selectKeyboard => [ N_("Choose your keyboard"), 1, 1, '1' ], + miscellaneous => [ N_("Security"), 1, 1, '', '' ], + doPartitionDisks => [ N_("Partitioning"), 1, 0, '', "selectInstallClass" ], + formatPartitions => [ N_("Format partitions"), 1, -1, '1', "doPartitionDisks" ], + choosePackages => [ N_("Choose packages to install"), 1, -2, '1', "formatPartitions" ], + installPackages => [ N_("Install system"), 1, -1, '', ["formatPartitions", "selectInstallClass"] ], + setRootPassword => [ N_("Root password"), 1, 1, '', "installPackages" ], + configureNetwork => [ N_("Configure networking"), 1, 1, '1', "formatPartitions" ], + setupBootloader => [ N_("Install bootloader"), 1, 0, '', "installPackages" ], + configureX => [ N_("Configure X"), 1, 1, '1', ["formatPartitions", "setupBootloader"] ], + summary => [ N_("Summary"), 1, 0, '', "installPackages" ], + configureCluster => [ N_("Configure cluster"), 1, 1, '', "configureNetwork", 'drakcluster' ], + configureServices => [ N_("Configure services"), 1, 1, '1', "installPackages" ], + installUpdates => [ N_("Install updates"), 1, 1, '', ["installPackages", "configureNetwork", "summary"] ], + exitInstall => [ N_("Exit install"), 0, 0, '', '' ], +); + for (my $i = 0; $i < @installSteps; $i += 2) { + my %h; @h{@installStepsFields} = @{ $installSteps[$i + 1] }; + $h{entered} = 0; + $h{onError} = $installSteps[$i + 2 * $h{onError}]; + $h{reachable} = !$h{needs}; + $installSteps{$installSteps[$i]} = \%h; + push @orderedInstallSteps, $installSteps[$i]; + } + $installSteps{first} = $installSteps[0]; +} + + +1; |