From 190150fae69cd0b7839b7f36c8139fff9079bb7f Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Tue, 19 Sep 2000 17:31:21 +0000 Subject: no_comment --- perl-install/install_steps.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'perl-install/install_steps.pm') diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm index ef6ce2e6d..c0246035e 100644 --- a/perl-install/install_steps.pm +++ b/perl-install/install_steps.pm @@ -145,7 +145,7 @@ sub doPartitionDisksAfter { } $o->{fstab} = [ fsedit::get_fstab(@{$o->{hds}}, $o->{raid}) ]; - fsedit::get_root($o->{fstab}) or die "Oops, no root partition"; + fsedit::get_root_($o->{fstab}) or die "Oops, no root partition"; if (my $s = delete $o->{stage1_hd}) { my ($part) = grep { $_->{device} eq $s->{device} } @{$o->{fstab}}; @@ -170,7 +170,7 @@ sub doPartitionDisks { if ($o->{isUpgrade}) { # either one root is defined (and all is ok), or we take the first one we find - my $p = fsedit::get_root($o->{fstab}) || first(install_any::find_root_parts($o->{hds}, $o->{prefix})) or die; + my $p = fsedit::get_root_($o->{fstab}) || first(install_any::find_root_parts($o->{hds}, $o->{prefix})) or die; install_any::use_root_part($o->{fstab}, $p, $o->{prefix}); } elsif ($o->{partitioning}{auto_allocate}) { fsedit::auto_allocate($o->{hds}, $o->{partitions}); -- cgit v1.2.1