You are viewing a plain text version of this content. The canonical link for it is here.
Posted to commits@spamassassin.apache.org by si...@apache.org on 2007/07/08 09:26:09 UTC

svn commit: r554330 - /spamassassin/trunk/lib/Mail/SpamAssassin/Plugin/BodyEval.pm

Author: sidney
Date: Sun Jul  8 00:25:59 2007
New Revision: 554330

URL: http://svn.apache.org/viewvc?view=rev&rev=554330
Log:
reduce backtracking in regexp for improved performance on some matches

Modified:
    spamassassin/trunk/lib/Mail/SpamAssassin/Plugin/BodyEval.pm

Modified: spamassassin/trunk/lib/Mail/SpamAssassin/Plugin/BodyEval.pm
URL: http://svn.apache.org/viewvc/spamassassin/trunk/lib/Mail/SpamAssassin/Plugin/BodyEval.pm?view=diff&rev=554330&r1=554329&r2=554330
==============================================================================
--- spamassassin/trunk/lib/Mail/SpamAssassin/Plugin/BodyEval.pm (original)
+++ spamassassin/trunk/lib/Mail/SpamAssassin/Plugin/BodyEval.pm Sun Jul  8 00:25:59 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;