svn commit: r525240 - /spamassassin/trunk/t/mimeparse.t

[jm...@apache.org]

Author: jm
Date: Tue Apr  3 11:44:11 2007
New Revision: 525240

URL: http://svn.apache.org/viewvc?view=rev&rev=525240
Log:
update mimeparse test to take text/foo content-type parsing change into account; text/richtext is now parsed as text/plain

Modified:
    spamassassin/trunk/t/mimeparse.t

Modified: spamassassin/trunk/t/mimeparse.t
URL: http://svn.apache.org/viewvc/spamassassin/trunk/t/mimeparse.t?view=diff&rev=525240&r1=525239&r2=525240
==============================================================================
--- spamassassin/trunk/t/mimeparse.t (original)
+++ spamassassin/trunk/t/mimeparse.t Tue Apr  3 11:44:11 2007
@@ -23,7 +23,7 @@
 my %files = (
 	"$prefix/t/data/nice/mime1" => [
 	  join("\n", 'multipart/alternative','text/plain',
-	             'multipart/mixed,text/richtext','application/andrew-inset'),
+	             'multipart/mixed,text/plain','application/andrew-inset'),
 	],
 
 	"$prefix/t/data/nice/mime2" => [
@@ -110,8 +110,9 @@
   close(INP);
 
   my $res = join("\n",$mail->content_summary());
-#  print "---$k---\n---\n$res\n---\n";
-  ok( $res eq shift @{$files{$k}} );
+  my $want = shift @{$files{$k}};
+#  print "---$k---\n---\nGOT: $res\n---\nEXPECTED: $want\n---\n";
+  ok( $res eq $want );
   if ( @{$files{$k}} ) {
     my @parts = $mail->find_parts(qr/./,1);