You are viewing a plain text version of this content. The canonical link for it is here.
Posted to commits@spamassassin.apache.org by fe...@apache.org on 2007/07/16 04:10:49 UTC
svn commit: r556494 -
/spamassassin/branches/3.2/lib/Mail/SpamAssassin/Plugin/BodyEval.pm
Author: felicity
Date: Sun Jul 15 19:10:49 2007
New Revision: 556494
URL: http://svn.apache.org/viewvc?view=rev&rev=556494
Log:
reduce backtracking in regexp for improved performance on some matches
Modified:
spamassassin/branches/3.2/lib/Mail/SpamAssassin/Plugin/BodyEval.pm
Modified: spamassassin/branches/3.2/lib/Mail/SpamAssassin/Plugin/BodyEval.pm
URL: http://svn.apache.org/viewvc/spamassassin/branches/3.2/lib/Mail/SpamAssassin/Plugin/BodyEval.pm?view=diff&rev=556494&r1=556493&r2=556494
==============================================================================
--- spamassassin/branches/3.2/lib/Mail/SpamAssassin/Plugin/BodyEval.pm (original)
+++ spamassassin/branches/3.2/lib/Mail/SpamAssassin/Plugin/BodyEval.pm Sun Jul 15 19:10:49 2007
@@ -240,7 +240,7 @@
my ($type, $rnd) = $part->rendered();
return unless $type;
- foreach ( $rnd =~ /^\s*([^:\n]{3,30})\s*:\s*\S/mg ) {
+ foreach ( $rnd =~ /^\s*([^:\s][^:\n]{2,29})\s*:\s*\S/mg ) {
my $str = lc $_;
$str =~ tr/a-z//cd;
#$str =~ s/([a-z])0([a-z])/$1o$2/g;