From ec3798f880b10ab8b9bc4a5708649a6791e505a2 Mon Sep 17 00:00:00 2001
From: Damien Chaumette <dchaumette@mandriva.com>
Date: Mon, 8 Sep 2003 14:54:48 +0000
Subject: - fix/use explanations - fix #5307 (firmware)

---
 perl-install/network/nfs.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install/network/nfs.pm')

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) };
-- 
cgit v1.2.1