diff options
| author | Stew Benedict <stewb@mandriva.org> | 2001-03-04 18:25:34 +0000 |
|---|---|---|
| committer | Stew Benedict <stewb@mandriva.org> | 2001-03-04 18:25:34 +0000 |
| commit | 0bd746bb5c9ad9713dd3775283516d9d9ddc702d (patch) | |
| tree | aaafcb702926d3a870cb13acb007649d317195fe /perl-install/install_steps_interactive.pm | |
| parent | 4696c33db7269fec1671fae299ba5a89ffdbd748 (diff) | |
| download | drakx-backup-do-not-use-0bd746bb5c9ad9713dd3775283516d9d9ddc702d.tar drakx-backup-do-not-use-0bd746bb5c9ad9713dd3775283516d9d9ddc702d.tar.gz drakx-backup-do-not-use-0bd746bb5c9ad9713dd3775283516d9d9ddc702d.tar.bz2 drakx-backup-do-not-use-0bd746bb5c9ad9713dd3775283516d9d9ddc702d.tar.xz drakx-backup-do-not-use-0bd746bb5c9ad9713dd3775283516d9d9ddc702d.zip | |
*** empty log message ***
Diffstat (limited to 'perl-install/install_steps_interactive.pm')
| -rw-r--r-- | perl-install/install_steps_interactive.pm | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm index d9b75ac35..d08fb0efb 100644 --- a/perl-install/install_steps_interactive.pm +++ b/perl-install/install_steps_interactive.pm @@ -322,6 +322,20 @@ Do you agree to loose all the partitions? _("DiskDrake failed to read correctly the partition table. Continue at your own risk!")); + if (arch() =~ /ppc/ && !$::expert) { #- need to make bootstrap part if recommended install - thx Pixel ;^) + if (defined $partition_table_mac'bootstrap_part) { + #- don't do anything if we've got the bootstrap setup + #- otherwise, go ahead and create one somewhere in the drive free space + } else { + if (defined $partition_table_mac'freepart_start && $partition_table_mac'freepart_size >= 1) { + my ($hd) = $partition_table_mac'freepart_device; + log::l("creating bootstrap partition on drive /dev/$hd->{device}, block $partition_table_mac'freepart_start"); + fsedit::add($hd, { start => $partition_table_mac'freepart_start, size => 1 << 11, type => 0x401, mntpoint => '' }, $o->{hds}, { force => 1, primaryOrExtended => 'Primary' }); + } else { + die "no free space for 1MB bootstrap"; + } + } + } if ($o->{isUpgrade}) { # either one root is defined (and all is ok), or we take the first one we find |