diff options
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/install_any.pm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index bd412af41..c24674044 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -775,6 +775,9 @@ sub getHds { $ok = fsedit::verifyHds($hds, $flags->{readonly}, $ok) unless $flags->{clearall} || $flags->{clear}; + #- try to figure out if the same number of hds is available, use them if ok. + $ok && $hds && @$hds > 0 && @{$o->{hds} || []} == @$hds and return $ok; + $o->{hds} = $hds; $o->{lvms} = $lvms; $o->{fstab} = [ fsedit::get_fstab(@$hds, @$lvms) ]; |