perl-modperl-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From s...@apache.org
Subject cvs commit: modperl-2.0/t/protocol/TestProtocol echo_block.pm
Date Fri, 07 May 2004 01:13:05 GMT
stas        2004/05/06 18:13:05

  Modified:    t/protocol/TestProtocol echo_block.pm
  Log:
  reversed logic is confusing
  
  Revision  Changes    Path
  1.3       +2 -2      modperl-2.0/t/protocol/TestProtocol/echo_block.pm
  
  Index: echo_block.pm
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/t/protocol/TestProtocol/echo_block.pm,v
  retrieving revision 1.2
  retrieving revision 1.3
  diff -u -u -r1.2 -r1.3
  --- echo_block.pm	4 May 2004 06:14:44 -0000	1.2
  +++ echo_block.pm	7 May 2004 01:13:05 -0000	1.3
  @@ -27,8 +27,8 @@
       if ($nonblocking) {
           $socket->opt_set(APR::SO_NONBLOCK => 0);
   
  -        # test that we really are in the non-blocking mode
  -        $socket->opt_get(APR::SO_NONBLOCK)
  +        # test that we really are in the blocking mode
  +        !$socket->opt_get(APR::SO_NONBLOCK)
               or die "failed to set non-blocking mode";
       }
   
  
  
  

Mime
View raw message