summaryrefslogtreecommitdiffstats
path: root/perl-install/partition_table/gpt.pm
diff options
context:
space:
mode:
authorThierry Vignaud <thierry.vignaud@gmail.com>2015-03-27 08:19:29 -0400
committerThomas Backlund <tmb@mageia.org>2015-03-27 22:32:45 +0159
commit6c8f2cc5e29445140ccdc29d04bf3876d545f16a (patch)
tree366e05eace2a84000dcb470235d4e18372f7e793 /perl-install/partition_table/gpt.pm
parent8ec5cb448e1d5ad539c2ee5caf25e67f20d63391 (diff)
downloaddrakx-6c8f2cc5e29445140ccdc29d04bf3876d545f16a.tar
drakx-6c8f2cc5e29445140ccdc29d04bf3876d545f16a.tar.gz
drakx-6c8f2cc5e29445140ccdc29d04bf3876d545f16a.tar.bz2
drakx-6c8f2cc5e29445140ccdc29d04bf3876d545f16a.tar.xz
drakx-6c8f2cc5e29445140ccdc29d04bf3876d545f16a.zip
make it more generic
just bind the libparted function (needed for next commit)
Diffstat (limited to 'perl-install/partition_table/gpt.pm')
-rw-r--r--perl-install/partition_table/gpt.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/partition_table/gpt.pm b/perl-install/partition_table/gpt.pm
index e59e96184..5de9337e3 100644
--- a/perl-install/partition_table/gpt.pm
+++ b/perl-install/partition_table/gpt.pm
@@ -111,7 +111,7 @@ sub read_one {
# FIXME: just use '@pt = map { ... } c::...' if part_numbers are always linear:
foreach (c::get_disk_partitions($hd->{file})) {
# fix detecting ESP (special case are they're detected through pt_type):
- if (c::is_partition_ESP($hd->{file}, $_->{part_number})) {
+ if (c::get_partition_flag($hd->{file}, $_->{part_number}, 'ESP')) {
$_->{pt_type} = 0xef;
}
@pt[$_->{part_number}-1] = $_;