diff options
Diffstat (limited to 'perl-install/fsedit.pm')
| -rw-r--r-- | perl-install/fsedit.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/fsedit.pm b/perl-install/fsedit.pm index ea1c80a81..126897889 100644 --- a/perl-install/fsedit.pm +++ b/perl-install/fsedit.pm @@ -217,10 +217,11 @@ sub has_mntpoint { my ($mntpoint, $hds) = @_; mntpoint2part($mntpoint, [ get_fstab(@$hds) ]); } -sub get_root { +sub get_root_ { my ($fstab, $boot) = @_; $boot && mntpoint2part("/boot", $fstab) || mntpoint2part("/", $fstab); } +sub get_root { &get_root_ || {} } #- do this before modifying $part->{mntpoint} #- $part->{mntpoint} should not be used here, use $mntpoint instead |