[popfile-commit] engine/tests TestMailParse.tst,1.21,1.22

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

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

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

Index: TestMailParse.tst
===================================================================
RCS file: /cvsroot/popfile/engine/tests/TestMailParse.tst,v
retrieving revision 1.21
retrieving revision 1.22
diff -C2 -d -r1.21 -r1.22
*** TestMailParse.tst	13 Oct 2003 20:23:41 -0000	1.21
--- TestMailParse.tst	20 Oct 2003 21:49:11 -0000	1.22
***************
*** 287,289 ****
--- 287,298 ----
  test_assert_equal( $cl->splitline( '=3Chtml=3E', '' ), '=3Chtml=3E' );
  
+ # Test the CRLF is preserved in QP encoding
+ 
+ open FILE, ">temp.tmp";
+ print FILE "From: John\n\n<img width=42\nheight=41>\n";
+ close FILE;
+ $cl->parse_file( 'temp.tmp' );
+ test_assert_equal( $cl->{words__}{'html:imgwidth42'}, 1 );
+ test_assert_equal( $cl->{words__}{'html:imgheight41'}, 1 );
+ 
  $b->stop();