perl-docs-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From s...@apache.org
Subject cvs commit: modperl-docs/src/docs/2.0/api/APR Const.pod
Date Fri, 07 May 2004 22:08:24 GMT
stas        2004/05/07 15:08:24

  Modified:    src/docs/2.0/api/APR Const.pod
  Log:
  $socket->opt_get API sync
  
  Revision  Changes    Path
  1.13      +7 -4      modperl-docs/src/docs/2.0/api/APR/Const.pod
  
  Index: Const.pod
  ===================================================================
  RCS file: /home/cvs/modperl-docs/src/docs/2.0/api/APR/Const.pod,v
  retrieving revision 1.12
  retrieving revision 1.13
  diff -u -u -r1.12 -r1.13
  --- Const.pod	19 Apr 2004 23:53:55 -0000	1.12
  +++ Const.pod	7 May 2004 22:08:24 -0000	1.13
  @@ -2012,14 +2012,17 @@
     1 nonblocking
     0 blocking
   
  -For example, to set the socket to a blocking IO mode:
  +For example, to set a socket to a blocking IO mode:
   
     use APR::Socket ();
     use APR::Const    -compile => qw(SO_NONBLOCK);
     ...
  -  my $oldval = $sock->opt_set(APR::SO_NONBLOCK, 0);
  -  die "failed to set the socket to a blocking IO mode: $ARP::err"
  -      unless defined $oldval;
  +  if ($socket->opt_get(APR::SO_NONBLOCK)) {
  +      $socket->opt_set(APR::SO_NONBLOCK => 0);
  +  }
  +
  +You don't have to query for this option, before setting it. It was
  +done for the demonstration purpose.
   
   =over
   
  
  
  

---------------------------------------------------------------------
To unsubscribe, e-mail: docs-cvs-unsubscribe@perl.apache.org
For additional commands, e-mail: docs-cvs-help@perl.apache.org


Mime
View raw message