From 1b5fd5c2c0b92cc516b16ddaf3d892c475b74db3 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Tue, 6 Mar 2001 15:20:39 +0000 Subject: (add): create 3 primaries before creating an extended if DAC960 (/dev/rd/*) --- perl-install/partition_table.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'perl-install/partition_table.pm') diff --git a/perl-install/partition_table.pm b/perl-install/partition_table.pm index 5a849d5bf..aad737c70 100644 --- a/perl-install/partition_table.pm +++ b/perl-install/partition_table.pm @@ -618,10 +618,11 @@ sub add($$;$$) { adjustStartAndEnd($hd, $part) unless $forceNoAdjust; my $e = $hd->{primary}{extended}; + my $nb_primaries = $hd->{device} =~ /^rd/ ? 3 : 1; if (arch() =~ /^sparc|ppc/ || $primaryOrExtended eq 'Primary' || - $primaryOrExtended !~ /Extended/ && is_empty_array_ref($hd->{primary}{normal})) { + $primaryOrExtended !~ /Extended/ && @{$hd->{primary}{normal} || []} < $nb_primaries) { eval { add_primary($hd, $part) }; return unless $@; } -- cgit v1.2.1