diff options
| author | Stew Benedict <stewb@mandriva.org> | 2001-03-07 15:53:16 +0000 |
|---|---|---|
| committer | Stew Benedict <stewb@mandriva.org> | 2001-03-07 15:53:16 +0000 |
| commit | 6f68ea188996d14b28460fcfb658acd8d9897cf7 (patch) | |
| tree | 9325690cce6e6f38bf4d7f35521a955ee07d2db2 /perl-install/install_steps_interactive.pm | |
| parent | 7e1353553ee0532a2380e0ead7839717262471c4 (diff) | |
| download | drakx-backup-do-not-use-6f68ea188996d14b28460fcfb658acd8d9897cf7.tar drakx-backup-do-not-use-6f68ea188996d14b28460fcfb658acd8d9897cf7.tar.gz drakx-backup-do-not-use-6f68ea188996d14b28460fcfb658acd8d9897cf7.tar.bz2 drakx-backup-do-not-use-6f68ea188996d14b28460fcfb658acd8d9897cf7.tar.xz drakx-backup-do-not-use-6f68ea188996d14b28460fcfb658acd8d9897cf7.zip | |
* perl-install/any.pm - change in partition_table_mac'xxx syntax
* perl-install/install_steps_interactive.pm - change in partition_table_mac'xxx syntax
* perl-install/partition_table_mac.pm - change in partition_table_mac'xxx syntax
Diffstat (limited to 'perl-install/install_steps_interactive.pm')
| -rw-r--r-- | perl-install/install_steps_interactive.pm | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm index 70de100ec..eb92b6014 100644 --- a/perl-install/install_steps_interactive.pm +++ b/perl-install/install_steps_interactive.pm @@ -323,14 +323,14 @@ _("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) { + 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' }); + 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"; } |