diff options
| author | Francois Pons <fpons@mandriva.com> | 2000-05-16 13:18:31 +0000 |
|---|---|---|
| committer | Francois Pons <fpons@mandriva.com> | 2000-05-16 13:18:31 +0000 |
| commit | 4679ec8bf83ef95a1b1e3f3c61dd21ceaab315ce (patch) | |
| tree | 28974a4161d8a464d59781d76ebe52f98a8bc210 /perl-install/partition_table.pm | |
| parent | 70800fea4199313a755c9dda383941f30c3a572a (diff) | |
| download | drakx-4679ec8bf83ef95a1b1e3f3c61dd21ceaab315ce.tar drakx-4679ec8bf83ef95a1b1e3f3c61dd21ceaab315ce.tar.gz drakx-4679ec8bf83ef95a1b1e3f3c61dd21ceaab315ce.tar.bz2 drakx-4679ec8bf83ef95a1b1e3f3c61dd21ceaab315ce.tar.xz drakx-4679ec8bf83ef95a1b1e3f3c61dd21ceaab315ce.zip | |
*** empty log message ***
Diffstat (limited to 'perl-install/partition_table.pm')
| -rw-r--r-- | perl-install/partition_table.pm | 12 |
1 files changed, 7 insertions, 5 deletions
diff --git a/perl-install/partition_table.pm b/perl-install/partition_table.pm index 1dc606b8e..b3719cf81 100644 --- a/perl-install/partition_table.pm +++ b/perl-install/partition_table.pm @@ -442,12 +442,14 @@ 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}; - $_->{extended} and $_->{extended}{local_start} = $_->{extended}{start} - $hd->{primary}{extended}{start}; + if (arch() !~ /^sparc/) { + foreach (@{$hd->{extended}}) { + # in case of extended partitions, the start sector must be local to the partition + $_->{normal}{local_start} = $_->{normal}{start} - $_->{start}; + $_->{extended} and $_->{extended}{local_start} = $_->{extended}{start} - $hd->{primary}{extended}{start}; - $hd->write($_->{start}, $_->{raw}) or die "writing of partition table failed"; + $hd->write($_->{start}, $_->{raw}) or die "writing of partition table failed"; + } } $hd->{isDirty} = 0; |