diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2004-08-05 03:37:58 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2004-08-05 03:37:58 +0000 |
commit | dcf7b4e2a9b84679117ae8006c418a9134431fc8 (patch) | |
tree | 1e83a78dcd704d0ce2cd063dbc15098cfdd4524b /perl-install | |
parent | c19a394e32fe4d163b27dc1dfbce347692d0babd (diff) | |
download | drakx-dcf7b4e2a9b84679117ae8006c418a9134431fc8.tar drakx-dcf7b4e2a9b84679117ae8006c418a9134431fc8.tar.gz drakx-dcf7b4e2a9b84679117ae8006c418a9134431fc8.tar.bz2 drakx-dcf7b4e2a9b84679117ae8006c418a9134431fc8.tar.xz drakx-dcf7b4e2a9b84679117ae8006c418a9134431fc8.zip |
fix backward compatibility {type} field in partitions and manualFstab
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/install_any.pm | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index 0b1ce16b6..5b5b5e32f 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -987,8 +987,12 @@ sub loadO { #- handle backward compatibility for things that changed foreach (@{$o->{partitions} || []}, @{$o->{manualFstab} || []}) { - if (my $pt_type = delete $_->{type}) { - fs::type::set_pt_type($_, $pt_type); + if (my $type = delete $_->{type}) { + if ($type =~ /^(0x)?(\d*)$/) { + fs::type::set_pt_type($_, $type); + } else { + fs::type::set_fs_type($_, $type); + } } } |