diff options
| author | Thierry Vignaud <tvignaud@mandriva.org> | 2004-06-04 10:05:17 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tvignaud@mandriva.org> | 2004-06-04 10:05:17 +0000 |
| commit | e8b1daa15349709fc86e8177063d1261f63ab138 (patch) | |
| tree | d5b29dd91db2aaef0e6f996fbc445fab1c1296ed /perl-install | |
| parent | 990b493c91047766fb21147bc3ce3713db080657 (diff) | |
| download | drakx-backup-do-not-use-e8b1daa15349709fc86e8177063d1261f63ab138.tar drakx-backup-do-not-use-e8b1daa15349709fc86e8177063d1261f63ab138.tar.gz drakx-backup-do-not-use-e8b1daa15349709fc86e8177063d1261f63ab138.tar.bz2 drakx-backup-do-not-use-e8b1daa15349709fc86e8177063d1261f63ab138.tar.xz drakx-backup-do-not-use-e8b1daa15349709fc86e8177063d1261f63ab138.zip | |
(setupBootloader__entries) fix typo (Andrea Celli)
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/any.pm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm index fcead3195..1210abf95 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -90,15 +90,19 @@ sub setupBootloader { require bootloader; general: { + print "STEP 1\n"; local $::Wizard_no_previous = 1 if $::isStandalone; setupBootloader__general($in, $b, $all_hds, $fstab, $security) or return 0; } + print "STEP 2\n"; setupBootloader__boot_bios_drive($in, $b, $hds) or goto general; { + print "STEP 3\n"; local $::Wizard_finished = 1 if $::isStandalone; setupBootloader__entries($in, $b, $all_hds, $fstab) or goto general; } + print "STEP 4\n"; #- somewhere should bootloader really installed ? $::isStandalone and my $_w = $in->wait_message(N("Please wait"), N("Bootloader installation in progress")); @@ -353,7 +357,7 @@ sub setupBootloader__entries { my ($e, $prefix); if ($in->ask_from_list_('', N("Which type of entry do you want to add?"), [ N_("Linux"), arch() =~ /sparc/ ? N_("Other OS (SunOS...)") : arch() =~ /ppc/ ? - N_("Other OS (MacOS...)") : N_("Other OS (windows...)") ] + N_("Other OS (MacOS...)") : N_("Other OS (Windows...)") ] ) eq "Linux") { $e = { type => 'image', root => '/dev/' . fsedit::get_root($fstab)->{device}, #- assume a good default. |