[popfile-commit] engine/Classifier MailParse.pm,1.91.2.3,1.91.2.4

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

Update of /cvsroot/popfile/engine/Classifier
In directory sc8-pr-cvs1:/tmp/cvs-serv27291

Modified Files:
      Tag: v0/18/1
	MailParse.pm 
Log Message:
reduce unneccesary colorization work in headers

Index: MailParse.pm
===================================================================
RCS file: /cvsroot/popfile/engine/Classifier/MailParse.pm,v
retrieving revision 1.91.2.3
retrieving revision 1.91.2.4
diff -C2 -d -r1.91.2.3 -r1.91.2.4
*** MailParse.pm	11 Apr 2003 00:33:57 -0000	1.91.2.3
--- MailParse.pm	11 Apr 2003 01:19:32 -0000	1.91.2.4
***************
*** 975,983 ****
      print "Header ($header) ($argument)\n" if ($self->{debug});
      
!     # Remove over-reading
!     $self->{ut} = '';  
!     
!     # Qeueue just this header for colorization    
!     $self->{ut} = splitline("$header: $argument\015\012", $encoding);
  
      # Check the encoding type in all RFC 2047 encoded headers
--- 975,985 ----
      print "Header ($header) ($argument)\n" if ($self->{debug});
      
!     if ($self->{color}) {
!         # Remove over-reading
!         $self->{ut} = '';  
!         
!         # Qeueue just this header for colorization    
!         $self->{ut} = splitline("$header: $argument\015\012", $encoding);
!     }    
  
      # Check the encoding type in all RFC 2047 encoded headers