From de4f752c310da49cfe15cc9cc90886354511b5cc Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Mon, 6 Aug 2007 11:21:09 +0000 Subject: - fix range max value >2TB when creating a partition (useful for LVs >2TB) nb: >> 11 and << 11 doesn't work on floats which we use to handle >2TB partitions. perl floats are precise enough up until 512TB --- perl-install/install/steps_interactive.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/install/steps_interactive.pm') diff --git a/perl-install/install/steps_interactive.pm b/perl-install/install/steps_interactive.pm index 5a1deb0b3..3f8e9bd0f 100644 --- a/perl-install/install/steps_interactive.pm +++ b/perl-install/install/steps_interactive.pm @@ -212,7 +212,7 @@ sub doPartitionDisks { log::l("creating bootstrap partition on drive /dev/$freepart->{hd}{device}, block $freepart->{start}"); $partition_table::mac::bootstrap_part = $freepart->{part}; log::l("bootstrap now at $partition_table::mac::bootstrap_part"); - my $p = { start => $freepart->{start}, size => 1 << 11, mntpoint => '' }; + my $p = { start => $freepart->{start}, size => MB(1), mntpoint => '' }; fs::type::set_pt_type($p, 0x401); fsedit::add($freepart->{hd}, $p, $o->{all_hds}, { force => 1, primaryOrExtended => 'Primary' }); $partition_table::mac::new_bootstrap = 1; -- cgit v1.2.1