[popfile-commit] engine/Classifier MailParse.pm,1.108,1.109

[<ssc...@us...>]

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__}) {