From 0ccc4da1a3bb759bd4333e92efb4a72366b5cb00 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Wed, 24 Oct 2001 12:09:18 +0000 Subject: (hds): in case of GPT, allow ext2 to be replaced by any kind of partitions (esp. EFI) --- perl-install/fsedit.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl-install/fsedit.pm b/perl-install/fsedit.pm index f5a52ea8f..1061fb7a0 100644 --- a/perl-install/fsedit.pm +++ b/perl-install/fsedit.pm @@ -159,7 +159,7 @@ sub hds { #- special case for type overloading (eg: reiserfs is 0x183) foreach (grep { isExt2($_) } partition_table::get_normal_parts($hd)) { my $type = typeOfPart($_->{device}); - $_->{type} = $type if $type > 0x100; + $_->{type} = $type if $type > 0x100 || $type && $hd->isa('partition_table_gpt'); } push @hds, $hd; } -- cgit v1.2.1