Mailing List Archive

svn commit: r224593 - in /spamassassin/trunk: lib/Mail/SpamAssassin/EvalTests.pm rules/70_testing.cf
Author: felicity
Date: Sat Jul 23 21:55:15 2005
New Revision: 224593

URL: http://svn.apache.org/viewcvs?rev=224593&view=rev
Log:
put in a test rule

Modified:
spamassassin/trunk/lib/Mail/SpamAssassin/EvalTests.pm
spamassassin/trunk/rules/70_testing.cf

Modified: spamassassin/trunk/lib/Mail/SpamAssassin/EvalTests.pm
URL: http://svn.apache.org/viewcvs/spamassassin/trunk/lib/Mail/SpamAssassin/EvalTests.pm?rev=224593&r1=224592&r2=224593&view=diff
==============================================================================
--- spamassassin/trunk/lib/Mail/SpamAssassin/EvalTests.pm (original)
+++ spamassassin/trunk/lib/Mail/SpamAssassin/EvalTests.pm Sat Jul 23 21:55:15 2005
@@ -3137,4 +3137,17 @@
return 0;
}

+sub check_from_format {
+ my ($self) = @_;
+
+ my $name = $self->get('From:name') || return;
+ return if ($name !~ m/^[A-Z][a-z]+\.[A-Z][a-z]+\@/);
+
+ my $addr = $self->get('From:addr') || return;
+ return if ($addr !~ m/^[A-Z][a-z]+\.[A-Z][a-z]+\@/);
+
+ return if ($name eq $addr);
+ return 1;
+}
+
1;

Modified: spamassassin/trunk/rules/70_testing.cf
URL: http://svn.apache.org/viewcvs/spamassassin/trunk/rules/70_testing.cf?rev=224593&r1=224592&r2=224593&view=diff
==============================================================================
--- spamassassin/trunk/rules/70_testing.cf (original)
+++ spamassassin/trunk/rules/70_testing.cf Sat Jul 23 21:55:15 2005
@@ -45,3 +45,5 @@

body T_DIET_1 /\b(?:(?:without|no) (?:exercis(?:e(?! price)|ing)|dieting)|weight.?loss|(?:extra|lose|lost|losing).{0,10}(?:pounds|weight|inches|lbs)|burn.{1,10}fat)\b/i
describe T_DIET_1 Lose Weight Spam
+
+header T_FROM_FORMAT eval:check_from_format()