diff options
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/install_any.pm | 2 | ||||
-rw-r--r-- | perl-install/install_steps.pm | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index bc15d0f90..f829063c1 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -993,7 +993,7 @@ sub generate_automatic_stage1_params { } elsif ($o->{method} eq 'ftp') { @ks = (server => $ENV{HOST}, directory => $ENV{PREFIX}, user => $ENV{LOGIN}, pass => $ENV{PASSWORD}); } elsif ($o->{method} eq 'nfs') { - cat_("/proc/mounts") =~ m|(\S+):(\S+)\s+/tmp/image nfs| or die; + cat_("/proc/mounts") =~ m|(\S+):(\S+)\s+/tmp/nfsimage| or die; @ks = (server => $1, directory => $2); } @ks = (method => $method, @ks); diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm index ededc1821..76afb301c 100644 --- a/perl-install/install_steps.pm +++ b/perl-install/install_steps.pm @@ -213,7 +213,7 @@ sub doPartitionDisksAfter { grep { $_->{mntpoint} && maybeFormatted($_) } @{$o->{fstab}}; } - cat_("/proc/mounts") =~ m|(\S+)\s+/tmp/image nfs| && + cat_("/proc/mounts") =~ m|(\S+)\s+/tmp/nfsimage| && !any { $_->{mntpoint} eq "/mnt/nfs" } @{$o->{all_hds}{nfss}} and push @{$o->{all_hds}{nfss}}, { type => 'nfs', mntpoint => "/mnt/nfs", device => $1, options => "noauto,ro,nosuid,soft,rsize=8192,wsize=8192" }; } |