From 94f257d030c1fd411ec48e438db18c657cd97e40 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Fri, 18 Aug 2000 04:32:24 +0000 Subject: no_comment --- perl-install/fs.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'perl-install/fs.pm') diff --git a/perl-install/fs.pm b/perl-install/fs.pm index 3d9628071..c23ee948f 100644 --- a/perl-install/fs.pm +++ b/perl-install/fs.pm @@ -60,10 +60,10 @@ sub check_mounted($) { } } -sub get_mntpoints_from_fstab($) { - my ($fstab) = @_; +sub get_mntpoints_from_fstab { + my ($fstab, $prefix) = @_; - foreach (read_fstab('/etc/fstab')) { + foreach (read_fstab("$prefix/etc/fstab")) { foreach my $p (@$fstab) { $p->{device} eq $_->{device} or next; $p->{mntpoint} ||= $_->{mntpoint}; -- cgit v1.2.1