From 2a85a35687ee87161fe4c936856ec0f45cb0e058 Mon Sep 17 00:00:00 2001
From: Brian Cully <bjc@kublai.com>
Date: Mon, 30 Oct 2017 21:57:09 -0400
Subject: Add X-SpamCat-Remaining header.

Add explicit header for number of messages remaining from a given
sender.
---
 lib/SpamCat.pm               | 1 +
 t/fixtures/foo.expected      | 1 +
 t/fixtures/foo2.expected     | 1 +
 t/fixtures/multiple.expected | 1 +
 t/fixtures/nosubj.expected   | 1 +
 5 files changed, 5 insertions(+)

diff --git a/lib/SpamCat.pm b/lib/SpamCat.pm
index 7a160cf..0f3c8b8 100644
--- a/lib/SpamCat.pm
+++ b/lib/SpamCat.pm
@@ -55,6 +55,7 @@ sub deliver {
       $new_subject = $count_str;
     }
     $email->header_set('Subject' => $new_subject);
+    $email->header_set('X-SpamCat-Remaining' => $count);
   }
 
   my $deliverfh = IO::File->new("| " . $self->{deliver}) ||
diff --git a/t/fixtures/foo.expected b/t/fixtures/foo.expected
index 9da87a9..6db2a36 100644
--- a/t/fixtures/foo.expected
+++ b/t/fixtures/foo.expected
@@ -10,5 +10,6 @@ Subject: test - [18/20]
 Message-Id: <foo@mta.example.com>
 Date: Thu, 20 Nov 2014 17:17:18 -0500 (EST)
 From: sender@example.com (Spamcat Sender)
+X-SpamCat-Remaining: 18
 
 Sample email.
diff --git a/t/fixtures/foo2.expected b/t/fixtures/foo2.expected
index e4d9335..da9e9ae 100644
--- a/t/fixtures/foo2.expected
+++ b/t/fixtures/foo2.expected
@@ -10,5 +10,6 @@ Subject: test - [17/20]
 Message-Id: <foo2@mta.example.com>
 Date: Thu, 20 Nov 2014 17:17:18 -0500 (EST)
 From: sender@example.com (Spamcat Sender)
+X-SpamCat-Remaining: 17
 
 Sample email.
diff --git a/t/fixtures/multiple.expected b/t/fixtures/multiple.expected
index d5c17a5..5c66e02 100644
--- a/t/fixtures/multiple.expected
+++ b/t/fixtures/multiple.expected
@@ -11,5 +11,6 @@ Subject: test - [20/20]
 Message-Id: <multiple@mta.example.com>
 Date: Thu, 20 Nov 2014 17:17:18 -0500 (EST)
 From: sender@example.com (Spamcat Sender)
+X-SpamCat-Remaining: 20
 
 Sample email.
diff --git a/t/fixtures/nosubj.expected b/t/fixtures/nosubj.expected
index 94db30e..7acd9ca 100644
--- a/t/fixtures/nosubj.expected
+++ b/t/fixtures/nosubj.expected
@@ -10,5 +10,6 @@ Message-Id: <nosubj@mta.example.com>
 Date: Thu, 20 Nov 2014 17:17:18 -0500 (EST)
 From: sender@example.com (Spamcat Sender)
 Subject: [20/20]
+X-SpamCat-Remaining: 20
 
 Sample email.
-- 
cgit v1.2.3