Add rule name to RuleAction logging

[pmg-api.git] / PMG / RuleDB / Block.pm

diff --git a/PMG/RuleDB/Block.pm b/PMG/RuleDB/Block.pm
index 81f00b9f7019df416eb8c2cdf10ad696d12127ba..c7c640efe3253f3ee5e6e5c33f8fc21371d60583 100644 (file)
--- a/PMG/RuleDB/Block.pm
+++ b/PMG/RuleDB/Block.pm
@@ -89,6 +89,8 @@ sub execute {
     my ($self, $queue, $ruledb, $mod_group, $targets, 
        $msginfo, $vars, $marks) = @_;
 
+    my $rulename = $vars->{RULE};
+
     if ($msginfo->{testmode}) {
        my $fh = $msginfo->{test_fh};
        print $fh "block from: $msginfo->{sender}\n";
@@ -96,7 +98,7 @@ sub execute {
     }
 
     foreach my $to (@$targets) {
-       syslog('info', "%s: block mail to <%s>", $queue->{logid}, encode('UTF-8', $to));
+       syslog('info', "%s: block mail to <%s> (rule: %s)", $queue->{logid}, encode('UTF-8', $to), $rulename);
     }
 
     $queue->set_status($targets, 'blocked');