http://issues.apache.org/SpamAssassin/show_bug.cgi?id=4996
------- Additional Comments From [EMAIL PROTECTED] 2006-07-18 18:45 -------
untested, but something like:
package ScoreMulPlugin;
use Mail::SpamAssassin::Plugin;
our @ISA = qw(Mail::SpamAssassin::Plugin);
sub new {
my $class = shift;
my $mailsaobject = shift;
$class = ref($class) || $class;
my $self = $class->SUPER::new($mailsaobject);
bless ($self, $class);
return $self;
}
sub parsed_metadata {
my ($self, $opts) = @_;
my $permsg = $opts->{permsgstatus};
$permsg->set_tag('SCOREMUL', sub { $permsg->get_score() * 10 });
}
------- You are receiving this mail because: -------
You are the assignee for the bug, or are watching the assignee.
