diff options
author | Thierry Vignaud <tvignaud@mandriva.org> | 2003-05-20 10:18:16 +0000 |
---|---|---|
committer | Thierry Vignaud <tvignaud@mandriva.org> | 2003-05-20 10:18:16 +0000 |
commit | 1cebaa8802f0a1a096b0667b0bc924358f5f7190 (patch) | |
tree | ad75fa145f2ba17724c824970076e6c40e7d907e /perl-install | |
parent | 4b661e0696c3ad97c42f0c263b7ae31ab1919e59 (diff) | |
download | drakx-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')
-rw-r--r-- | perl-install/network/nfs.pm | 1 |
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/\.$//; |