From eb9dd09cb90c9bd41775382ba2febd43f1b8a62d Mon Sep 17 00:00:00 2001
From: "martin f. krafft" <madduck@madduck.net>
Date: Sun, 14 Sep 2008 13:04:55 +0200
Subject: [PATCH 1/1] allow messages to be marked as read

---
 procmail/deliver | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/procmail/deliver b/procmail/deliver
index e299423..e2bd907 100644
--- a/procmail/deliver
+++ b/procmail/deliver
@@ -23,6 +23,15 @@
 *$ ! DEST ?? ^\.
 { DEST=".$DEST" }
 
+:0
+* MARK_READ ?? .
+{
+  TRAP="$TRAP; BASENAME=\"\${DESTFILE##*/}:2,S\""
+  TRAP="$TRAP; DIRNAME=\"\${DESTFILE%/new/*}/cur\""
+  TRAP="$TRAP; DESTFILE=\"\$DIRNAME/\$BASENAME\""
+  TRAP="$TRAP; mv \"\$LASTFOLDER\" \"$BASE/\$DESTFILE\""
+}
+
 :0
 {
   LOG="deliver:     delivering message $MSGID to $DEST$NL"
-- 
2.39.5