summaryrefslogtreecommitdiffstats
path: root/perl-install/network
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2003-05-20 10:18:16 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2003-05-20 10:18:16 +0000
commit1cebaa8802f0a1a096b0667b0bc924358f5f7190 (patch)
treead75fa145f2ba17724c824970076e6c40e7d907e /perl-install/network
parent4b661e0696c3ad97c42f0c263b7ae31ab1919e59 (diff)
downloaddrakx-1cebaa8802f0a1a096b0667b0bc924358f5f7190.tar
drakx-1cebaa8802f0a1a096b0667b0bc924358f5f7190.tar.gz
drakx-1cebaa8802f0a1a096b0667b0bc924358f5f7190.tar.bz2
drakx-1cebaa8802f0a1a096b0667b0bc924358f5f7190.tar.xz
drakx-1cebaa8802f0a1a096b0667b0bc924358f5f7190.zip
(find_servers): chomp is uneeded
Diffstat (limited to 'perl-install/network')
-rw-r--r--perl-install/network/nfs.pm1
1 files changed, 0 insertions, 1 deletions
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/\.$//;