http://issues.apache.org/SpamAssassin/show_bug.cgi?id=4996
------- Additional Comments From [EMAIL PROTECTED] 2006-07-18 21:18 -------
Just to follow up, even though it doesn't belong here darn it ... ;)
Thomas, Michael, and myself chatted via IRC. In the end, this code would
probably work -- except that Thomas is running 3.0 which doesn't allow set_tag()
to do coderefs (because get_tag() doesn't handle it). 3.1 and beyond DTRT in
get_tag().
(In reply to comment #3)
> 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.
