From: minima Date: Fri, 11 Jan 2002 12:02:53 +0000 (+0000) Subject: make M$ TCP connx blocking again X-Git-Tag: R_1_50~86 X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=commitdiff_plain;h=b56ccffc81ac94b40755bb8c7485eb223f7e2ff4;p=spider.git make M$ TCP connx blocking again --- diff --git a/Changes b/Changes index e5ebe33e..a30c4d0f 100644 --- a/Changes +++ b/Changes @@ -1,3 +1,5 @@ +11Jan02======================================================================= +1. Make M$ TCP connx blocking again, sigh... 10Jan02======================================================================= 1. set SO_LINGER = 0 to try to prevent the system sending data on a closing socket. This MAY help some of the hanging problems (but I am now beginning diff --git a/perl/Msg.pm b/perl/Msg.pm index 3dcc1641..f6164132 100644 --- a/perl/Msg.pm +++ b/perl/Msg.pm @@ -74,7 +74,7 @@ BEGIN { eval '*F_SETFL = sub { 0 };'; eval '*IPPROTO_TCP = sub { 6 };'; eval '*TCP_NODELAY = sub { 1 };'; - $blocking_supported = 1; + $blocking_supported = 0; # it appears that this DOESN'T work :-( } }