From 3dd38fc0df608e7275ab024bf7ad677ee344d3f8 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Wed, 19 Mar 2008 18:18:43 +0000
Subject: partially revert previous commit (since there will be no "next
 commit" on setupBootloader__boot_bios_drive)

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

(limited to 'perl-install')

diff --git a/perl-install/any.pm b/perl-install/any.pm
index b79c5e006..0955ea526 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -307,14 +307,10 @@ sub setupBootloader__boot_bios_drive {
 	#- some bios mapping already there
 	return 1;
     } elsif (bootloader::mixed_kind_of_disks($hds) && $b->{boot} =~ /\d$/) { #- on a partition
-	_ask_boot_bios_drive($in, $b, $hds);
+	# see below
     } else {
-	1;
+	return 1;
     }
-}
-
-sub _ask_boot_bios_drive {
-    my ($in, $b, $hds) = @_;
 
     log::l("_ask_boot_bios_drive");
     my $hd = $in->ask_from_listf('', N("You decided to install the bootloader on a partition.
-- 
cgit v1.2.1