From 190150fae69cd0b7839b7f36c8139fff9079bb7f Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Tue, 19 Sep 2000 17:31:21 +0000
Subject: no_comment

---
 perl-install/fsedit.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'perl-install/fsedit.pm')

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
-- 
cgit v1.2.1