diff options
| -rw-r--r-- | perl-install/install_any.pm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index 3fa2596d8..eccca9a18 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -525,9 +525,11 @@ sub selectSupplMedia { my $mediadir = '/mnt/nfsmedia' . $medium_name; $url = "$::prefix$mediadir"; -d $url or mkdir_p($url); - eval { fs::mount("$host:$dir", "$::prefix$mediadir", 'nfs'); 1 } + my $dev = "$host:$dir"; + eval { fs::mount($dev, $url, 'nfs'); 1 } or do { log::l("Mount failed: $@"); return 'error' }; - #- TODO add $mediadir in fstab for post-installation + #- add $mediadir in fstab for post-installation + push @{$o->{all_hds}{nfss}}, { fs_type => 'nfs', mntpoint => $mediadir, device => $dev, options => "noauto,ro,nosuid,soft,rsize=8192,wsize=8192" }; } else { $url = $o->ask_from_entry('', N("URL of the mirror?")) or return 'error'; $url =~ s!/+\z!!; |