do not purge duplicates but discard them

[etc/mailfilter.git] / procmail / deliver

diff --git a/procmail/deliver b/procmail/deliver
index e29942364cfd96404b74c47ebfce0d63b5aeb6be..af2f70c4dd5c5985f13dd3ae284f29fc8a2a97d7 100644 (file)
--- a/procmail/deliver
+++ b/procmail/deliver
@@ -23,6 +23,16 @@
 *$ ! DEST ?? ^\.
 { DEST=".$DEST" }
 
+:0
+* MARK_READ ?? .
+{
+  LOG="deliver:     marking messages $MSGID as read because of $MARK_READ$NL"
+  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"