summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2002-01-17 18:07:15 +0000
committerPascal Rigaux <pixel@mandriva.com>2002-01-17 18:07:15 +0000
commit72324a1ab79d50807a8d372e68bbe815816464c6 (patch)
tree2c0ea4679672e3b2e7c5a77e4f1607080fadb9dd /perl-install
parent13089734a9489406a1b717fa2be280438ba8f1ca (diff)
downloaddrakx-72324a1ab79d50807a8d372e68bbe815816464c6.tar
drakx-72324a1ab79d50807a8d372e68bbe815816464c6.tar.gz
drakx-72324a1ab79d50807a8d372e68bbe815816464c6.tar.bz2
drakx-72324a1ab79d50807a8d372e68bbe815816464c6.tar.xz
drakx-72324a1ab79d50807a8d372e68bbe815816464c6.zip
fix many disks bios remapping (esp. booting on scsi when ide is present)
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/bootloader.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm
index 836a96506..5aff81522 100644
--- a/perl-install/bootloader.pm
+++ b/perl-install/bootloader.pm
@@ -689,7 +689,7 @@ sub write_lilo_conf {
if ($dev2bios{$dev}) {
my %bios2dev = reverse %dev2bios;
print F "disk=/dev/$bios2dev{0} bios=0x80";
- printf F "disk=/dev/$dev bios=0x%x", 0x80 + $dev2bios{$dev};
+ printf F "disk=/dev/$dev bios=0x%x\n", 0x80 + $dev2bios{$dev};
} elsif ($dev =~ /hd[bde]/) {
print F "disk=/dev/$dev bios=0x80";
}
@@ -743,6 +743,7 @@ sub install_lilo {
sub dev2bios {
my ($hds, $where) = @_;
+ $where =~ s|/dev/||;
my @dev = map { $_->{device} } @$hds;
member($where, @dev) or ($where) = @dev; #- if not on mbr,