summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--Mailman/Handlers/ToArchive.py4
1 files changed, 4 insertions, 0 deletions
diff --git a/Mailman/Handlers/ToArchive.py b/Mailman/Handlers/ToArchive.py
index 321258a1e..e162dad97 100644
--- a/Mailman/Handlers/ToArchive.py
+++ b/Mailman/Handlers/ToArchive.py
@@ -16,6 +16,7 @@
"""Add the message to the archives."""
+import string
from Mailman import mm_cfg
@@ -24,5 +25,8 @@ def process(mlist, msg):
# short circuits
if getattr(msg, 'isdigest', 0):
return
+ archivep = msg.getheader('x-archive')
+ if archivep and string.lower(archivep) == 'no':
+ return
# TBD: this needs to be converted to the new pipeline machinery
mlist.ArchiveMail(msg)