summaryrefslogtreecommitdiffstats
path: root/perl-install/partition_table_mac.pm
diff options
context:
space:
mode:
authorStew Benedict <stewb@mandriva.org>2001-03-14 21:45:42 +0000
committerStew Benedict <stewb@mandriva.org>2001-03-14 21:45:42 +0000
commit75085b969b939ac9ca5ebdf1fe7c36ea4a36b8f5 (patch)
treecc1990314a60d37bd1d3b12b0dcb29fcb5f99892 /perl-install/partition_table_mac.pm
parent5889d46fd238fbf99b0e7c52360466e7b9f086ce (diff)
downloaddrakx-backup-do-not-use-75085b969b939ac9ca5ebdf1fe7c36ea4a36b8f5.tar
drakx-backup-do-not-use-75085b969b939ac9ca5ebdf1fe7c36ea4a36b8f5.tar.gz
drakx-backup-do-not-use-75085b969b939ac9ca5ebdf1fe7c36ea4a36b8f5.tar.bz2
drakx-backup-do-not-use-75085b969b939ac9ca5ebdf1fe7c36ea4a36b8f5.tar.xz
drakx-backup-do-not-use-75085b969b939ac9ca5ebdf1fe7c36ea4a36b8f5.zip
fix bootstrap partition creation/tracking
allow Xpmac to launch in 2 modes based on cmdline
Diffstat (limited to 'perl-install/partition_table_mac.pm')
-rw-r--r--perl-install/partition_table_mac.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/partition_table_mac.pm b/perl-install/partition_table_mac.pm
index c4c85d799..52486a776 100644
--- a/perl-install/partition_table_mac.pm
+++ b/perl-install/partition_table_mac.pm
@@ -2,7 +2,7 @@ package partition_table_mac; # $Id$
use diagnostics;
#use strict; - fixed other PPC code to comply, but program bails on empty partition table - sbenedict
-use vars qw(@ISA $freepart_device $bootstrap_part $freepart_start $freepart_size $macos_part);
+use vars qw(@ISA $freepart_device $bootstrap_part $freepart_start $freepart_size $freepart_part $macos_part);
@ISA = qw(partition_table_raw);
@@ -144,6 +144,7 @@ sub read($$) {
$freepart_start = $h{start};
$freepart_size = $h{size}/2048;
$freepart_device = $hd;
+ $freepart_part = "/dev/" . $hd->{device} . ($i+1);
log::l("free apple partition found on drive /dev/$freepart_device->{device}, block $freepart_start, size $freepart_size");
}
next;