[popfile-commit] engine/Classifier MailParse.pm,1.169,1.170

[<jgr...@us...>]

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

Modified Files:
	MailParse.pm 
Log Message:
Preserve CRLF inside quoted-printable and add a test

Index: MailParse.pm
===================================================================
RCS file: /cvsroot/popfile/engine/Classifier/MailParse.pm,v
retrieving revision 1.169
retrieving revision 1.170
diff -C2 -d -r1.169 -r1.170
*** MailParse.pm	14 Oct 2003 16:15:26 -0000	1.169
--- MailParse.pm	20 Oct 2003 21:49:11 -0000	1.170
***************
*** 1401,1405 ****
              if ( $self->{encoding__} =~ /quoted\-printable/i ) {
                  $line       = decode_qp( $line );
!                 $line       =~ s/[\r\n]+$//g;
                  $self->{ut__} = decode_qp( $self->{ut__} ) if ( $self->{color__} );
              }
--- 1401,1405 ----
              if ( $self->{encoding__} =~ /quoted\-printable/i ) {
                  $line       = decode_qp( $line );
!                 $line       =~ s/[\r\n]+$/ /g;
                  $self->{ut__} = decode_qp( $self->{ut__} ) if ( $self->{color__} );
              }