From e2409e3581aadb3321e6f58c30c5a13a9d266b8b Mon Sep 17 00:00:00 2001
From: epg <>
Date: Thu, 25 Nov 2004 05:09:31 +0000
Subject: [PATCH] (filter_mail): Support a post_store_hook, in case someone
 wants to do post-processing for a message.  This is getting out of hand; all
 these hooks should be folded into a single .mincrc or something...

---
 minc | 11 ++++++++++-
 1 file changed, 10 insertions(+), 1 deletion(-)

diff --git a/minc b/minc
index 85aeadf..277cd52 100755
--- a/minc
+++ b/minc
@@ -537,6 +537,7 @@ sub filter_mail {
     my $mhfolder;
     my $spam = 0;
     my $saved = 0;
+    my $msgnum;
     my %FOLDERS = ('SPAM'=>1);
 
     if (-f "$HOME/.mincspam") {
@@ -551,6 +552,12 @@ sub filter_mail {
         require "$HOME/.mincfilter";
     }
 
+    if (-f "$HOME/.minchooks") {
+        require "$HOME/.minchooks";
+    } else {
+        eval "sub post_store_hook { }";
+    }
+
     @baton = spam_start_hook();
 
     foreach $msg (@msglist) {
@@ -568,7 +575,9 @@ sub filter_mail {
             $saved++;
         }
 
-        store_message($msg, $mhfolder);
+        $msgnum = store_message($msg, $mhfolder);
+
+        post_store_hook($mhfolder, $msgnum);
 
         print("\r");
         if (not $FOLDERS{$mhfolder}) {
-- 
2.56.0