summaryrefslogtreecommitdiffstats
path: root/perl-install/fsedit.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2001-10-18 22:09:38 +0000
committerPascal Rigaux <pixel@mandriva.com>2001-10-18 22:09:38 +0000
commitfbdf055c5f169b4605e8c7e3b4142dc92e22baee (patch)
tree15a815c0dec92435c70e853f870b166ed5af2b5f /perl-install/fsedit.pm
parent86d42155bc11e397d502e9876aad2dd3082946f4 (diff)
downloaddrakx-fbdf055c5f169b4605e8c7e3b4142dc92e22baee.tar
drakx-fbdf055c5f169b4605e8c7e3b4142dc92e22baee.tar.gz
drakx-fbdf055c5f169b4605e8c7e3b4142dc92e22baee.tar.bz2
drakx-fbdf055c5f169b4605e8c7e3b4142dc92e22baee.tar.xz
drakx-fbdf055c5f169b4605e8c7e3b4142dc92e22baee.zip
- add checksum verif on partition entries
- detect the type of partition since the partition table types seem quite poor
Diffstat (limited to 'perl-install/fsedit.pm')
-rw-r--r--perl-install/fsedit.pm3
1 files changed, 3 insertions, 0 deletions
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});