Mailing List Archive

svn commit: rev 6719 - incubator/spamassassin/trunk/lib/Mail/SpamAssassin
Author: quinlan
Date: Tue Feb 17 23:51:15 2004
New Revision: 6719

Modified:
incubator/spamassassin/trunk/lib/Mail/SpamAssassin/EvalTests.pm
Log:
remove some old URI code not needed now


Modified: incubator/spamassassin/trunk/lib/Mail/SpamAssassin/EvalTests.pm
==============================================================================
--- incubator/spamassassin/trunk/lib/Mail/SpamAssassin/EvalTests.pm (original)
+++ incubator/spamassassin/trunk/lib/Mail/SpamAssassin/EvalTests.pm Tue Feb 17 23:51:15 2004
@@ -1654,7 +1654,6 @@
# number of 8-bit chars in the body text first.

$body = join ("\n", @$body);
- $body =~ s/\b(?:URI:\S+)//g; # strip URIs out
if ($self->are_more_high_bits_set ($body)) {
return 1;
}
@@ -2129,9 +2128,6 @@
# remove shift-JIS charset codes
$line =~ s/\x1b\$B.*\x1b\(B//gs;

- # remove URIs
- $line =~ s/URI:\S+//gs;
-
$len += length($line);

# count numerals as lower case, otherwise 'date|mail' is spam
@@ -3557,7 +3553,6 @@

if ( $type eq 'text/html' ) {
foreach my $w ( grep(/\w/,split(/\s+/,$rnd)) ) {
- next if ( $w =~ /^URI:/ );
#dbg("HTML: $w");
$html{$w}++;
}