[popfile-commit] engine/Proxy Proxy.pm,1.31,1.32

[<ssc...@us...>]

Update of /cvsroot/popfile/engine/Proxy
In directory sc8-pr-cvs1:/tmp/cvs-serv17799

Modified Files:
	Proxy.pm 
Log Message:
eliminate delays in reading from pipes in last checkin

Index: Proxy.pm
===================================================================
RCS file: /cvsroot/popfile/engine/Proxy/Proxy.pm,v
retrieving revision 1.31
retrieving revision 1.32
diff -C2 -d -r1.31 -r1.32
*** Proxy.pm	21 Aug 2003 19:47:36 -0000	1.31
--- Proxy.pm	21 Aug 2003 20:53:59 -0000	1.32
***************
*** 216,222 ****
          my $message;
  
!         if ( ( $self->{pipe_cache__} eq '' ) && &{ $self->{pipeready_} }($handle) ) {
  
!             # refill the cache when it is empty
  
              sysread($handle, my $string, -s $handle);
--- 216,222 ----
          my $message;
  
!         if ( &{ $self->{pipeready_} }($handle) ) {
  
!             # add data to the pipe cache whenever the pipe is ready
  
              sysread($handle, my $string, -s $handle);