From: epg <>
Date: Mon, 19 Sep 2005 16:15:36 +0000 (+0000)
Subject: (filter_mail): Catch (and discard) exceptions when subject and from
X-Git-Url: https://diplodocus.org/git/minc/commitdiff_plain/92b87e4c064bb2f147bc92a1745a2309aaee0397

(filter_mail): Catch (and discard) exceptions when subject and from
headers don't exist.
---

diff --git a/minc b/minc
index 39ed230..ca4b9b3 100755
--- a/minc
+++ b/minc
@@ -570,8 +570,11 @@ sub filter_mail {
             $spam++;
         } else {
             $saved++;
-            my $from = [@{$headers{'from'}}]->[-1];
-            my $subject = [@{$headers{'subject'}}]->[-1];
+            my $from = '';
+            my $subject = '';
+            # Sometimes these headers are missing...
+            eval { $from = [@{$headers{'from'}}]->[-1] };
+            eval { $subject = [@{$headers{'subject'}}]->[-1] };
             for ($from, $subject) {
                 tr/\x00-\x1f\x80-\xff/ /;
             }