Update of /cvsroot/popfile/engine/Proxy
In directory sc8-pr-cvs1:/tmp/cvs-serv17787/Proxy
Modified Files:
SMTP.pm
Log Message:
Send the classification statistics up to parent from SMTP module
Index: SMTP.pm
===================================================================
RCS file: /cvsroot/popfile/engine/Proxy/SMTP.pm,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -d -r1.5 -r1.6
*** SMTP.pm 6 Mar 2003 21:25:55 -0000 1.5
--- SMTP.pm 6 Mar 2003 21:30:31 -0000 1.6
***************
*** 139,143 ****
if ( $self->echo_response_( $mail, $client, $command ) ) {
$count += 1;
! $self->{classifier__}->classify_and_modify( $client, $mail, $download_count, $count, 0, '' );
my $response = <$mail>;
$self->tee_( $client, $response );
--- 139,148 ----
if ( $self->echo_response_( $mail, $client, $command ) ) {
$count += 1;
!
! my $class = $self->{classifier__}->classify_and_modify( $client, $mail, $download_count, $count, 0, '' );
!
! # Tell the parent that we just handled a mail
! print $pipe "$class$eol";
!
my $response = <$mail>;
$self->tee_( $client, $response );
|
