X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FMsg.pm;h=f6164132a33469ae7757e171863d722146e10195;hb=b56ccffc81ac94b40755bb8c7485eb223f7e2ff4;hp=3dcc1641060277c2a21593a575cdedf0c778972c;hpb=cc33b2e9ed8241c21cb362976f8637223d333990;p=spider.git

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 :-(
 	} 
 }