From d23d3f83976f6cf5678f270009488e09c4b8c51c Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Thu, 27 Feb 2003 19:16:21 +0000 Subject: - add get_info_from_fstab() - use it when reading existing fstab (to get for example devfs mount) --- perl-install/install_any.pm | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) (limited to 'perl-install/install_any.pm') diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index b29cf48b5..cdfb7e19b 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -980,12 +980,11 @@ sub find_root_parts { } sub use_root_part { my ($all_hds, $part, $prefix) = @_; - my $fstab = [ fsedit::get_really_all_fstab($all_hds) ]; { my $handle = any::inspect($part, $prefix) or die; - fs::merge_info_from_fstab($fstab, $handle->{dir}, 'uniq'); + fs::get_info_from_fstab($all_hds, $handle->{dir}, 'uniq'); } - map { $_->{mntpoint} = 'swap' } grep { isSwap($_) } @$fstab; #- use all available swap. + map { $_->{mntpoint} = 'swap' } grep { isSwap($_) } fsedit::get_really_all_fstab($all_hds); #- use all available swap. } sub getHds { -- cgit v1.2.1