Update of /cvsroot/popfile/engine/Proxy
In directory sc8-pr-cvs1:/tmp/cvs-serv2995
Modified Files:
Tag: b0/19/0
POP3.pm
Log Message:
fix calling of "flush_extra" to fix:
[ 773093 ] 19.1 toptoo bug
Index: POP3.pm
===================================================================
RCS file: /cvsroot/popfile/engine/Proxy/POP3.pm,v
retrieving revision 1.55.2.1
retrieving revision 1.55.2.2
diff -C2 -d -r1.55.2.1 -r1.55.2.2
*** POP3.pm 15 Jul 2003 17:50:36 -0000 1.55.2.1
--- POP3.pm 21 Jul 2003 08:41:08 -0000 1.55.2.2
***************
*** 142,146 ****
# and mail accounts
my $user_command = 'USER (.+)(:(\d+))?' . $self->config_( 'separator' ) . '(.+)';
! if ( $command =~ /$user_command/i ) {
if ( $1 ne '' ) {
if ( $mail = $self->verify_connected_( $mail, $client, $1, $3 || 110 ) ) {
--- 142,146 ----
# and mail accounts
my $user_command = 'USER (.+)(:(\d+))?' . $self->config_( 'separator' ) . '(.+)';
! if ( $command =~ /$user_command/i ) {
if ( $1 ne '' ) {
if ( $mail = $self->verify_connected_( $mail, $client, $1, $3 || 110 ) ) {
***************
*** 274,278 ****
my $class = $self->{classifier__}->classify_and_modify( $mail, undef, $download_count, 0, 1, '', 0 );
! $self->flush_extra( $mail, $client, 0 );
if ( $self->echo_response_($mail, $client, $command ) ) {
--- 274,278 ----
my $class = $self->{classifier__}->classify_and_modify( $mail, undef, $download_count, 0, 1, '', 0 );
! $self->flush_extra_( $mail, $client, 0 );
if ( $self->echo_response_($mail, $client, $command ) ) {
|
