From 60ac60d8a763ff2c8ae64b8d4243b01a54b498ee Mon Sep 17 00:00:00 2001 From: Francois Pons Date: Fri, 4 Feb 2000 14:22:17 +0000 Subject: *** empty log message *** --- perl-install/partition_table.pm | 1 + 1 file changed, 1 insertion(+) (limited to 'perl-install/partition_table.pm') diff --git a/perl-install/partition_table.pm b/perl-install/partition_table.pm index 4702a1210..151353989 100644 --- a/perl-install/partition_table.pm +++ b/perl-install/partition_table.pm @@ -410,6 +410,7 @@ sub write($) { } $hd->write(0, $hd->{primary}{raw}, $hd->{primary}{info}) or die "writing of partition table failed"; + #- should be fixed but a extended exist with no real extended partition, that blanks mbr! foreach (@{$hd->{extended}}) { # in case of extended partitions, the start sector must be local to the partition $_->{normal}{local_start} = $_->{normal}{start} - $_->{start}; -- cgit v1.2.1