summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThomas Backlund <tmb@mageia.org>2015-01-08 21:03:47 +0159
committerThomas Backlund <tmb@mageia.org>2015-01-08 21:03:47 +0159
commit55d5f9f81a9b01b582f872221c8c4c3d383d97ba (patch)
tree35dbcc595584973fe178bb3c6be7cfd0124c1579 /perl-install
parent5fd7be6bb8822a8434dcf667482771b2753a8b8d (diff)
downloaddrakx-55d5f9f81a9b01b582f872221c8c4c3d383d97ba.tar
drakx-55d5f9f81a9b01b582f872221c8c4c3d383d97ba.tar.gz
drakx-55d5f9f81a9b01b582f872221c8c4c3d383d97ba.tar.bz2
drakx-55d5f9f81a9b01b582f872221c8c4c3d383d97ba.tar.xz
drakx-55d5f9f81a9b01b582f872221c8c4c3d383d97ba.zip
uefi needs gpt partitioning
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/partition_table.pm4
1 files changed, 2 insertions, 2 deletions
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'),
);