--- MessageBatch.pm.old	2003-12-09 18:04:02.000000000 +0000
+++ MessageBatch.pm	2003-12-09 18:05:47.000000000 +0000
@@ -465,7 +465,12 @@
 
   while(($id, $message) = each %{$this->{messages}}) {
     next if $message->{deleted};
-    if ($message->{cantparse}) {
+    if ($message->{toomanyattach}) {
+      $message->{otherreports}{""} .=
+        MailScanner::Config::LanguageValue($message, 'toomanyattachments') .
+                                           "\n";
+      $message->{othertypes}{""}   .= 'e';
+    } elsif ($message->{cantparse}) {
       $message->{otherreports}{""} .=
         MailScanner::Config::LanguageValue($message, 'cantanalyze') . "\n";
       $message->{othertypes}{""}   .= 'e';