From 45316487e3c2e383b11e42af12e84199561a6790 Mon Sep 17 00:00:00 2001
From: Matt Simerson <matt@tnpi.net>
Date: Wed, 18 Dec 2013 00:16:41 -0500
Subject: [PATCH] anglebrackets: increase penalty, prefix log msgs

---
 plugins/dont_require_anglebrackets | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/plugins/dont_require_anglebrackets b/plugins/dont_require_anglebrackets
index c8f25fd..16841e9 100644
--- a/plugins/dont_require_anglebrackets
+++ b/plugins/dont_require_anglebrackets
@@ -24,9 +24,9 @@ MAIL FROM:user@example.com
 sub hook_mail_pre {
     my ($self, $transaction, $addr) = @_;
     unless ($addr =~ /^<.*>$/) {
-        $self->log(LOGINFO, "added MAIL angle brackets");
         $addr = '<' . $addr . '>';
-        $self->adjust_karma(-1);
+        $self->adjust_karma(-2);
+        $self->log(LOGINFO, "fail, added MAIL angle brackets");
     }
     return (OK, $addr);
 }
@@ -34,9 +34,9 @@ sub hook_mail_pre {
 sub hook_rcpt_pre {
     my ($self, $transaction, $addr) = @_;
     unless ($addr =~ /^<.*>$/) {
-        $self->log(LOGINFO, "added RCPT angle brackets");
         $addr = '<' . $addr . '>';
-        $self->adjust_karma(-1);
+        $self->adjust_karma(-2);
+        $self->log(LOGINFO, "fail, added RCPT angle brackets");
     }
     return (OK, $addr);
 }