From 871db532fab936f7b931b0a3ea9fb177a277970c Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Tue, 2 Mar 2004 15:40:58 +0000
Subject: drakboot --boot is now a wizard

---
 perl-install/any.pm | 11 ++++++++---
 1 file changed, 8 insertions(+), 3 deletions(-)

(limited to 'perl-install/any.pm')

diff --git a/perl-install/any.pm b/perl-install/any.pm
index 4ca36a4e8..61075ed6d 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -89,10 +89,15 @@ sub setupBootloader {
 
     require bootloader;
   general:
-    setupBootloader__general($in, $b, $all_hds, $fstab, $security) or return 0;
+    {
+	local $::Wizard_no_previous = 1 if $::isStandalone;
+	setupBootloader__general($in, $b, $all_hds, $fstab, $security) or return 0;
+    }
     setupBootloader__boot_bios_drive($in, $b, $hds) or goto general;
-
-    setupBootloader__entries($in, $b, $all_hds, $fstab) or goto general;
+    {
+	local $::Wizard_finished = 1 if $::isStandalone;
+	setupBootloader__entries($in, $b, $all_hds, $fstab) or goto general;
+    }
 
     #- somewhere should bootloader really installed ?
     $::isStandalone and my $_w = $in->wait_message(N("Please wait"), N("Bootloader installation in progress"));
-- 
cgit v1.2.1