diff options
author | Brian Cully <bjc@kublai.com> | 2017-10-30 21:57:09 -0400 |
---|---|---|
committer | Brian Cully <bjc@kublai.com> | 2017-10-30 21:57:09 -0400 |
commit | 2a85a35687ee87161fe4c936856ec0f45cb0e058 (patch) | |
tree | a38ddc5c4a09cdb2b2fd0950a152d093d6f37c65 /lib | |
parent | 0964736afe66c066f8b77a54d77f27bdb8d24cd5 (diff) | |
download | spamcat-2a85a35687ee87161fe4c936856ec0f45cb0e058.tar.gz spamcat-2a85a35687ee87161fe4c936856ec0f45cb0e058.zip |
Add X-SpamCat-Remaining header.
Add explicit header for number of messages remaining from a given
sender.
Diffstat (limited to 'lib')
-rw-r--r-- | lib/SpamCat.pm | 1 |
1 files changed, 1 insertions, 0 deletions
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}) || |