summaryrefslogtreecommitdiffstats
path: root/perl-install/network/nfs.pm
diff options
context:
space:
mode:
authorDamien Chaumette <dchaumette@mandriva.com>2003-09-08 14:54:48 +0000
committerDamien Chaumette <dchaumette@mandriva.com>2003-09-08 14:54:48 +0000
commitec3798f880b10ab8b9bc4a5708649a6791e505a2 (patch)
treea3e4b068ce79b2b4388f51eea125266783156bea /perl-install/network/nfs.pm
parent0f88f5713171dac3a88c72b7c9e543948a78afd6 (diff)
downloaddrakx-ec3798f880b10ab8b9bc4a5708649a6791e505a2.tar
drakx-ec3798f880b10ab8b9bc4a5708649a6791e505a2.tar.gz
drakx-ec3798f880b10ab8b9bc4a5708649a6791e505a2.tar.bz2
drakx-ec3798f880b10ab8b9bc4a5708649a6791e505a2.tar.xz
drakx-ec3798f880b10ab8b9bc4a5708649a6791e505a2.zip
- fix/use explanations
- fix #5307 (firmware)
Diffstat (limited to 'perl-install/network/nfs.pm')
-rw-r--r--perl-install/network/nfs.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/network/nfs.pm b/perl-install/network/nfs.pm
index d257f5346..e564d6fc7 100644
--- a/perl-install/network/nfs.pm
+++ b/perl-install/network/nfs.pm
@@ -43,7 +43,7 @@ sub find_servers {
my @servers;
local $_;
while (<$F>) {
- my ($ip, $name) = /(\S+)\s+(\S+)/ or log::l("bad line in rpcinfo output"), next;
+ my ($ip, $name) = /(\S+)\s+(\S+)/ or log::explanations("bad line in rpcinfo output"), next;
$name =~ s/\Q.$domain//;
$name =~ s/\.$//;
push @servers, { ip => $ip, if_($name ne '(unknown)', name => $name) };