svn commit: rev 56705 - spamassassin/trunk/lib/Mail/SpamAssassin

[jm...@apache.org]

Author: jm
Date: Fri Nov  5 15:03:35 2004
New Revision: 56705

Modified:
   spamassassin/trunk/lib/Mail/SpamAssassin/PerMsgStatus.pm
Log:
oops, checked in multiple patches in last checkin. reverting

Modified: spamassassin/trunk/lib/Mail/SpamAssassin/PerMsgStatus.pm
==============================================================================
--- spamassassin/trunk/lib/Mail/SpamAssassin/PerMsgStatus.pm	(original)
+++ spamassassin/trunk/lib/Mail/SpamAssassin/PerMsgStatus.pm	Fri Nov  5 15:03:35 2004
@@ -202,9 +202,6 @@
       $self->do_full_tests($priority, \$fulltext);
       $self->do_full_eval_tests($priority, \$fulltext);
 
-      # rundump($self->{main});
-
-
       # we may need to call this more often than once through the loop, but
       # it needs to be done at least once, either at the beginning or the end.
       $self->{main}->call_plugins ("check_tick", { permsgstatus => $self });
@@ -1762,7 +1759,6 @@
   local ($_);
 
   my $text;
-  my $uri_count = 0;
 
   for (@$textary) {
     # NOTE: do not modify $_ in this loop
@@ -1790,7 +1786,6 @@
 
       # warn("uri: got URI: $uri\n");
       push @uris, $uri;
-      last if (scalar @uris > 200);
     }
     while (/($Addr_spec_re)/go) {
       my $uri = $1;
@@ -1799,7 +1794,6 @@
 
       #warn("uri: got URI: $uri\n");
       push @uris, $uri;
-      last if (scalar @uris > 200);
     }
   }
 
@@ -1809,10 +1803,6 @@
     push @uris, @{ $self->{msg}->{metadata}->{html}->{uri} };
   }
 
-  # trim to a sane, limited number of urls
-  if (scalar @uris > 200) {
-    @uris = splice (@uris, 200);
-  }
   @uris = Mail::SpamAssassin::Util::uri_list_canonify(@uris);
 
   # get domain list
@@ -2610,24 +2600,6 @@
     $self->{fulltext_tmpfile} = undef;
   }
 }
-
-
-our $dumpcount = 0;
-# sub rundump {
-# my $spamtest = shift;
-# $dumpcount++;
-# warn "dumping to dumps/dump.$$.$dumpcount\n";
-# system ("mkdir -p dumps");
-# local (*OLDERR);
-# open (OLDERR, ">&STDERR");
-# open (STDERR, ">dumps/dump.$$.$dumpcount");
-# use Devel::Peek;
-# Dump ($spamtest, 9999);
-# close STDERR;
-# open (STDERR, ">&OLDERR");
-# # use Devel::Size qw(size total_size); warn "JMD ".total_size($self);
-# }
-
 
 ###########################################################################