|
From: <jgr...@us...> - 2003-10-20 22:47:04
|
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__} );
}
|