diff options
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); + } } } |