diff options
| author | Pascal Terjan <pterjan@gmail.com> | 2015-02-03 22:12:52 +0000 |
|---|---|---|
| committer | Pascal Terjan <pterjan@gmail.com> | 2015-02-03 22:16:09 +0000 |
| commit | 586710269d03201dcc2b698376e6f332c971825b (patch) | |
| tree | 9a1d7ddc04c40806e84f4ea74e176a738ad9a477 /perl-install/partition_table.pm | |
| parent | 5b898cd75b85c7334fb2f07a56bedbcbc24301d9 (diff) | |
| download | drakx-586710269d03201dcc2b698376e6f332c971825b.tar drakx-586710269d03201dcc2b698376e6f332c971825b.tar.gz drakx-586710269d03201dcc2b698376e6f332c971825b.tar.bz2 drakx-586710269d03201dcc2b698376e6f332c971825b.tar.xz drakx-586710269d03201dcc2b698376e6f332c971825b.zip | |
Simplify code
Diffstat (limited to 'perl-install/partition_table.pm')
| -rw-r--r-- | perl-install/partition_table.pm | 3 |
1 files changed, 1 insertions, 2 deletions
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}; |