From 55d5f9f81a9b01b582f872221c8c4c3d383d97ba Mon Sep 17 00:00:00 2001 From: Thomas Backlund Date: Thu, 8 Jan 2015 21:03:47 +0159 Subject: uefi needs gpt partitioning --- perl-install/partition_table.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'perl-install/partition_table.pm') diff --git a/perl-install/partition_table.pm b/perl-install/partition_table.pm index 227417dd5..0e493ef6f 100644 --- a/perl-install/partition_table.pm +++ b/perl-install/partition_table.pm @@ -222,7 +222,7 @@ sub get_normal_parts_and_holes { sub _default_type { my ($hd) = @_; - arch() =~ /ia64/ ? 'gpt' : + is_uefi() ? 'gpt' : $hd->{totalsectors} > 4 * 1024 * 1024 * 2048 ? 'lvm' : "dos"; #- default to LVM on full disk when >4TB } @@ -248,7 +248,7 @@ sub read_primary { #- it can be safely considered that the first sector is used to probe the partition table #- but other sectors (typically for extended partition ones) have to match this type! my @parttype = ( - if_(arch() =~ /^ia64/, 'gpt'), + if_( is_uefi(), 'gpt'), # gpt must be tried before dos as it presents a fake compatibility mbr ('gpt', 'lvm', 'dmcrypt', 'dos', 'bsd', 'sun', 'mac'), ); -- cgit v1.2.1