svn commit: r474219 - /spamassassin/trunk/lib/Mail/SpamAssassin/Plugin/MIMEEval.pm

[jm...@apache.org]

Author: jm
Date: Mon Nov 13 01:39:31 2006
New Revision: 474219

URL: http://svn.apache.org/viewvc?view=rev&rev=474219
Log:
check syntax error in check_for_faraway_charset() eval rule; are_more_high_bits_set() is not on the PerMsgStatus object any more

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

Modified: spamassassin/trunk/lib/Mail/SpamAssassin/Plugin/MIMEEval.pm
URL: http://svn.apache.org/viewvc/spamassassin/trunk/lib/Mail/SpamAssassin/Plugin/MIMEEval.pm?view=diff&rev=474219&r1=474218&r2=474219
==============================================================================
--- spamassassin/trunk/lib/Mail/SpamAssassin/Plugin/MIMEEval.pm (original)
+++ spamassassin/trunk/lib/Mail/SpamAssassin/Plugin/MIMEEval.pm Mon Nov 13 01:39:31 2006
@@ -55,6 +55,7 @@
 sub are_more_high_bits_set {
   my ($self, $str) = @_;
 
+  # TODO: I suspect a tr// trick may be faster here
   my $numhis = () = ($str =~ /[\200-\377]/g);
   my $numlos = length($str) - $numhis;
 
@@ -81,7 +82,7 @@
     # number of 8-bit chars in the body text first.
 
     $body = join("\n", @$body);
-    if ($pms->are_more_high_bits_set ($body)) {
+    if ($self->are_more_high_bits_set ($body)) {
       return 1;
     }
   }