Update of /cvsroot/popfile/engine/Proxy
In directory sc8-pr-cvs1:/tmp/cvs-serv14595
Modified Files:
Proxy.pm
Log Message:
another stupid syntax error
Index: Proxy.pm
===================================================================
RCS file: /cvsroot/popfile/engine/Proxy/Proxy.pm,v
retrieving revision 1.6
retrieving revision 1.7
diff -C2 -d -r1.6 -r1.7
*** Proxy.pm 18 Mar 2003 00:18:07 -0000 1.6
--- Proxy.pm 18 Mar 2003 02:24:26 -0000 1.7
***************
*** 339,344 ****
last if ( $self->{alive_} == 0 );
! print $client $_;
! #$self->tee_($client, $_);
# The termination has to be a single line with exactly a dot on it and nothing
--- 339,344 ----
last if ( $self->{alive_} == 0 );
! #print $client $_;
! $self->tee_($client, $_);
# The termination has to be a single line with exactly a dot on it and nothing
***************
*** 420,424 ****
if ( $mail->connected ) {
my $selector = new IO::Select( $mail );
! my ($ready) = $selector->can_read( (!$null_resp,$self->global_config_( 'timeout' ),.5) );
if ( ( defined( $ready ) ) && ( $ready == $mail ) ) {
--- 420,424 ----
if ( $mail->connected ) {
my $selector = new IO::Select( $mail );
! my ($ready) = $selector->can_read( (!$null_resp?$self->global_config_( 'timeout' ):.5) );
if ( ( defined( $ready ) ) && ( $ready == $mail ) ) {
|
