From fbdf055c5f169b4605e8c7e3b4142dc92e22baee Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Thu, 18 Oct 2001 22:09:38 +0000 Subject: - add checksum verif on partition entries - detect the type of partition since the partition table types seem quite poor --- perl-install/fsedit.pm | 3 +++ 1 file changed, 3 insertions(+) (limited to 'perl-install/fsedit.pm') diff --git a/perl-install/fsedit.pm b/perl-install/fsedit.pm index 1e22b87a6..f5a52ea8f 100644 --- a/perl-install/fsedit.pm +++ b/perl-install/fsedit.pm @@ -153,6 +153,9 @@ sub hds { member($_->{device}, @{$flags->{clear} || []}) and partition_table::remove($hd, $_) foreach partition_table::get_normal_parts($hd); + # special case for Various type + $_->{type} = typeOfPart($_->{device}) || 0x100 foreach grep { $_->{type} == 0x100 } partition_table::get_normal_parts($hd); + #- special case for type overloading (eg: reiserfs is 0x183) foreach (grep { isExt2($_) } partition_table::get_normal_parts($hd)) { my $type = typeOfPart($_->{device}); -- cgit v1.2.1