stas 2004/05/07 18:29:00
Modified: src/docs/2.0/user/handlers protocols.pod
Log:
api sync
Revision Changes Path
1.17 +1 -3 modperl-docs/src/docs/2.0/user/handlers/protocols.pod
Index: protocols.pod
===================================================================
RCS file: /home/cvs/modperl-docs/src/docs/2.0/user/handlers/protocols.pod,v
retrieving revision 1.16
retrieving revision 1.17
diff -u -u -r1.16 -r1.17
--- protocols.pod 8 Apr 2004 21:54:37 -0000 1.16
+++ protocols.pod 8 May 2004 01:29:00 -0000 1.17
@@ -243,9 +243,7 @@
sub handler {
my $c = shift;
my $socket = $c->client_socket;
- my $oldval = $socket->opt_set(APR::SO_NONBLOCK, 0);
- die "failed to set the socket to a blocking IO mode: $ARP::err"
- unless defined $oldval;
+ $socket->opt_set(APR::SO_NONBLOCK, 0);
my $buff;
while (1) {
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]