summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/NEWS3
-rw-r--r--perl-install/install/NEWS2
-rw-r--r--perl-install/partition_table/gpt.pm4
3 files changed, 9 insertions, 0 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS
index b3e387a94..df345b2db 100644
--- a/perl-install/NEWS
+++ b/perl-install/NEWS
@@ -1,3 +1,6 @@
+- diskdrake (GPT):
+ o fix retrieving LVM/RAID partition type
+
Version 16.71 - 25 March 2015
- diskdrake:
diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS
index d45440ca0..4b80fff97 100644
--- a/perl-install/install/NEWS
+++ b/perl-install/install/NEWS
@@ -1,3 +1,5 @@
+- GPT partitionning:
+ o fix retrieving LVM/RAID partition type
- tell users to ignore Gtk3 warnings
Version 16.72 - 26 March 2015
diff --git a/perl-install/partition_table/gpt.pm b/perl-install/partition_table/gpt.pm
index 5de9337e3..dc169c183 100644
--- a/perl-install/partition_table/gpt.pm
+++ b/perl-install/partition_table/gpt.pm
@@ -113,6 +113,10 @@ sub read_one {
# fix detecting ESP (special case are they're detected through pt_type):
if (c::get_partition_flag($hd->{file}, $_->{part_number}, 'ESP')) {
$_->{pt_type} = 0xef;
+ } elsif (c::get_partition_flag($hd->{file}, $_->{part_number}, 'LVM')) {
+ $_->{pt_type} = 0x8e;
+ } elsif (c::get_partition_flag($hd->{file}, $_->{part_number}, 'RAID')) {
+ $_->{pt_type} = 0xfd;
}
@pt[$_->{part_number}-1] = $_;
}