Mailing List Archive

Author: jm
Date: Sun Oct 30 15:44:37 2005
New Revision: 329668

URL: http://svn.apache.org/viewcvs?rev=329668&view=rev
Log:
note more clearly whose mass-checks are used

Modified:
spamassassin/trunk/masses/rule-qa/automc/ruleqa.cgi

Modified: spamassassin/trunk/masses/rule-qa/automc/ruleqa.cgi
URL: http://svn.apache.org/viewcvs/spamassassin/trunk/masses/rule-qa/automc/ruleqa.cgi?rev=329668&r1=329667&r2=329668&view=diff
==============================================================================
--- spamassassin/trunk/masses/rule-qa/automc/ruleqa.cgi (original)
+++ spamassassin/trunk/masses/rule-qa/automc/ruleqa.cgi Sun Oct 30 15:44:37 2005
@@ -455,7 +455,34 @@
sub showfreqsubset {
my ($filename, $strdate) = @_;
read_freqs_file($filename);
+
+ if ($key eq 'DETAILS.new') {
+ # report which sets we used
+ summarise_head($freqs_head{$key}, $filename, $strdate, $rule);
+ }
+
get_freqs_for_rule($filename, $strdate, $rule);
+}
+
+sub summarise_head {
+ my ($head, $filename, $strdate, $rule) = @_;
+
+ my @mcfiles = ();
+ if ($head =~ / ham results used for \S+ \S+ \S+: (.*)$/) {
+ @mcfiles = split(' ', $1);
+ }
+
+ map {
+ s/^ham-//; s/\.log$//;
+ } @mcfiles;
+
+ my $who = join(', ', @mcfiles);
+
+ print qq{
+
+ <p><em>(Using mass-check data from: $who)</em></p>
+
+ };
}

sub read_freqs_file {