From 9f0124c4939104748f33559a2efc017d6f41b369 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Thu, 6 Nov 2003 10:37:18 +0000
Subject: escaped strings fixes

---
 perl-install/network/nfs.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

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

diff --git a/perl-install/network/nfs.pm b/perl-install/network/nfs.pm
index dae09af1b..20c9055f3 100644
--- a/perl-install/network/nfs.pm
+++ b/perl-install/network/nfs.pm
@@ -35,8 +35,8 @@ sub check {
 }
 
 sub find_servers {
-    my $pid2 = open(my $F2, "rpcinfo-flushed -b mountd 2 |");
-    my $pid3 = open(my $F3, "rpcinfo-flushed -b mountd 3 |");
+    open(my $F2, "rpcinfo-flushed -b mountd 2 |");
+    open(my $F3, "rpcinfo-flushed -b mountd 3 |");
 
     common::nonblock($F2);
     common::nonblock($F3);
-- 
cgit v1.2.1