Update of /cvsroot/popfile/engine/Classifier
In directory sc8-pr-cvs1:/tmp/cvs-serv2783
Modified Files:
Bayes.pm
Log Message:
consume long messages when toptoo is enabled
Index: Bayes.pm
===================================================================
RCS file: /cvsroot/popfile/engine/Classifier/Bayes.pm,v
retrieving revision 1.147
retrieving revision 1.148
diff -C2 -d -r1.147 -r1.148
*** Bayes.pm 23 May 2003 14:58:12 -0000 1.147
--- Bayes.pm 3 Jun 2003 08:27:10 -0000 1.148
***************
*** 1020,1024 ****
if ( $got_full_body == 0 ) {
! $self->echo_to_dot_( $mail, $client ) if ( $echo );
} else {
if ( $classification ne 'unclassified' ) {
--- 1020,1028 ----
if ( $got_full_body == 0 ) {
! if ( $echo ) {
! $self->echo_to_dot_( $mail, $client );
! } else {
! $self->echo_to_dot_( $mail, undef );
! }
} else {
if ( $classification ne 'unclassified' ) {
***************
*** 1457,1462 ****
# Check for an abort
last if ( $self->{alive_} == 0 );
!
! print $client $_;
# The termination has to be a single line with exactly a dot on it and nothing
--- 1461,1466 ----
# Check for an abort
last if ( $self->{alive_} == 0 );
!
! print $client $_ if ( defined( $client ) );
# The termination has to be a single line with exactly a dot on it and nothing
|
