Update of /cvsroot/popfile/engine/Classifier
In directory sc8-pr-cvs1:/tmp/cvs-serv20572/Classifier
Modified Files:
MailParse.pm
Log Message:
Fix another bug that could cause a message to get the wrong classification. This one would occur with base64 encoded data that was not flushed
Index: MailParse.pm
===================================================================
RCS file: /cvsroot/popfile/engine/Classifier/MailParse.pm,v
retrieving revision 1.147
retrieving revision 1.148
diff -C2 -d -r1.147 -r1.148
*** MailParse.pm 21 Jul 2003 18:49:52 -0000 1.147
--- MailParse.pm 22 Jul 2003 19:13:21 -0000 1.148
***************
*** 955,963 ****
}
- $self->{colorized__} .= $self->clear_out_base64();
close MSG;
$self->stop_parse();
- $self->{in_html_tag__} = 0;
if ( $self->{color__} ) {
--- 955,961 ----
***************
*** 1053,1056 ****
--- 1051,1056 ----
my ( $self ) = @_;
+ $self->{colorized__} .= $self->clear_out_base64();
+
# If we reach here and discover that we think that we are in an unclosed HTML tag then there
# has probably been an error (such as a < in the text messing things up) and so we dump
***************
*** 1060,1063 ****
--- 1060,1065 ----
$self->add_line( $self->{html_tag__} . ' ' . $self->{html_arg__}, 0, '' );
}
+
+ $self->{in_html_tag__} = 0;
}
|
