projects
/
spider.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (from parent 1:
cc33b2e
)
make M$ TCP connx blocking again
author
minima
<minima>
Fri, 11 Jan 2002 12:02:53 +0000
(12:02 +0000)
committer
minima
<minima>
Fri, 11 Jan 2002 12:02:53 +0000
(12:02 +0000)
Changes
patch
|
blob
|
history
perl/Msg.pm
patch
|
blob
|
history
diff --git
a/Changes
b/Changes
index e5ebe33ee45e0e32f193c2372d9407b47cdacbe8..a30c4d0f392de5fb1785523f1c0030824ee8c519 100644
(file)
--- 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
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 3dcc1641060277c2a21593a575cdedf0c778972c..f6164132a33469ae7757e171863d722146e10195 100644
(file)
--- 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 };';
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 :-(
}
}
}
}