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:
78ca91f
)
even more M$ tuning
author
minima
<minima>
Fri, 11 Jan 2002 00:44:05 +0000
(
00:44
+0000)
committer
minima
<minima>
Fri, 11 Jan 2002 00:44:05 +0000
(
00:44
+0000)
perl/Msg.pm
patch
|
blob
|
history
diff --git
a/perl/Msg.pm
b/perl/Msg.pm
index fdcc9fa00c5eef4472bec4f64ad74ac331c7ff12..19c81484e5cd95662d489b673bc15f34578e8cdd 100644
(file)
--- a/
perl/Msg.pm
+++ b/
perl/Msg.pm
@@
-58,6
+58,8
@@
BEGIN {
if ($^O eq 'MSWin32') {
eval '*EINPROGRESS = sub { 10036 };';
eval '*EWOULDBLOCK = *EAGAIN = sub { 10035 };';
if ($^O eq 'MSWin32') {
eval '*EINPROGRESS = sub { 10036 };';
eval '*EWOULDBLOCK = *EAGAIN = sub { 10035 };';
+ eval '*F_GETFL = sub { 0 };';
+ eval '*F_SETFL = sub { 0 };';
$blocking_supported = 1;
}
}
$blocking_supported = 1;
}
}