Update of /cvsroot/popfile/engine/Classifier
In directory sc8-pr-cvs1:/tmp/cvs-serv12482
Modified Files:
MailParse.pm
Log Message:
restore $self->{color__} logic
Index: MailParse.pm
===================================================================
RCS file: /cvsroot/popfile/engine/Classifier/MailParse.pm,v
retrieving revision 1.108
retrieving revision 1.109
diff -C2 -d -r1.108 -r1.109
*** MailParse.pm 10 Apr 2003 22:20:33 -0000 1.108
--- MailParse.pm 10 Apr 2003 22:22:47 -0000 1.109
***************
*** 830,840 ****
print ">>> $line" if $self->{debug};
! if (!$self->{in_html_tag__}) {
! $colorized .= $self->{ut__};
! $self->{ut__} = '';
! }
!
! $self->{ut__} .= splitline($line, $encoding);
if ($self->{in_headers__}) {
--- 830,843 ----
print ">>> $line" if $self->{debug};
+
+ if ($self->{color__}) {
! if (!$self->{in_html_tag__}) {
! $colorized .= $self->{ut__};
! $self->{ut__} = '';
! }
!
! $self->{ut__} .= splitline($line, $encoding);
! }
if ($self->{in_headers__}) {
|