From: Gurusamy Sarathy <gsar@cpan.org>
Date: Tue, 14 Mar 2000 05:37:29 +0000 (+0000)
Subject: add sleep() to avoid race on NeXT (from M.E. O'Neill
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=e3e876cf806e9a3bb353ac41418f1f80df999716;p=p5sagit%2Fp5-mst-13.2.git

add sleep() to avoid race on NeXT (from M.E. O'Neill
<oneill@cs.sfu.ca>)

p4raw-id: //depot/perl@5722
---

diff --git a/t/lib/io_sock.t b/t/lib/io_sock.t
index e03e223..056d131 100755
--- a/t/lib/io_sock.t
+++ b/t/lib/io_sock.t
@@ -148,7 +148,7 @@ if($pid = fork()) {
     }
 
     # some machines seem to suffer from a race condition here
-#    sleep(1);
+    sleep(1);
 
     $sock = IO::Socket->new(Domain => AF_INET,
                             PeerAddr => "localhost:$port");