From 1cebaa8802f0a1a096b0667b0bc924358f5f7190 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Tue, 20 May 2003 10:18:16 +0000
Subject: (find_servers): chomp is uneeded

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

(limited to 'perl-install/network')

diff --git a/perl-install/network/nfs.pm b/perl-install/network/nfs.pm
index 22452e17c..127800ecb 100644
--- a/perl-install/network/nfs.pm
+++ b/perl-install/network/nfs.pm
@@ -43,7 +43,6 @@ sub find_servers {
     my @servers;
     local $_;
     while (<$F>) {
-	chomp;
 	my ($ip, $name) = /(\S+)\s+(\S+)/ or log::l("bad line in rpcinfo output"), next;
 	$name =~ s/\Q.$domain//; 
 	$name =~ s/\.$//;
-- 
cgit v1.2.1