From 586710269d03201dcc2b698376e6f332c971825b Mon Sep 17 00:00:00 2001 From: Pascal Terjan Date: Tue, 3 Feb 2015 22:12:52 +0000 Subject: Simplify code --- perl-install/partition_table.pm | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'perl-install') diff --git a/perl-install/partition_table.pm b/perl-install/partition_table.pm index d167b6521..27582682b 100644 --- a/perl-install/partition_table.pm +++ b/perl-install/partition_table.pm @@ -248,9 +248,8 @@ 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_( is_uefi(), 'gpt'), # gpt must be tried before dos as it presents a fake compatibility mbr - ('gpt', 'lvm', 'dmcrypt', 'dos', 'bsd', 'sun', 'mac'), + 'gpt', 'lvm', 'dmcrypt', 'dos', 'bsd', 'sun', 'mac', ); foreach ('empty', @parttype, 'unknown') { /unknown/ and die "unknown partition table format on disk " . $hd->{file}; -- cgit v1.2.1