diff -ruP --exclude=.DS_Store mailman-2.1.6/Mailman/Defaults.py.in mailman-2.1.6-modinc/Mailman/Defaults.py.in --- mailman-2.1.6/Mailman/Defaults.py.in Fri May 13 03:34:39 2005 +++ mailman-2.1.6-modinc/Mailman/Defaults.py.in Thu Jun 9 13:12:12 2005 @@ -1000,7 +1000,9 @@ # Check for administrivia in messages sent to the main list? DEFAULT_ADMINISTRIVIA = Yes - +# Should the body of a message requiring moderation be included in the +# request to the moderator(s) +DEFAULT_MODERATE_INC_BODY = Yes ##### # Digestification defaults. Same caveat applies here as with list defaults. diff -ruP --exclude=.DS_Store mailman-2.1.6/Mailman/Gui/General.py mailman-2.1.6-modinc/Mailman/Gui/General.py --- mailman-2.1.6/Mailman/Gui/General.py Sat Feb 5 07:39:53 2005 +++ mailman-2.1.6-modinc/Mailman/Gui/General.py Thu Jun 9 13:12:12 2005 @@ -155,6 +155,10 @@ _("""Hide the sender of a message, replacing it with the list address (Removes From, Sender and Reply-To fields)""")), + ('moderate_inc_body', mm_cfg.Radio, (_('No'), _('Yes')), 0, + _("""Should the body of a message requiring moderation be + included in the request to the moderator(s))""")), + _('''Reply-To: header munging'''), ('first_strip_reply_to', mm_cfg.Radio, (_('No'), _('Yes')), 0, diff -ruP --exclude=.DS_Store mailman-2.1.6/Mailman/Handlers/Hold.py mailman-2.1.6-modinc/Mailman/Handlers/Hold.py --- mailman-2.1.6/Mailman/Handlers/Hold.py Sun Oct 10 14:14:30 2004 +++ mailman-2.1.6-modinc/Mailman/Handlers/Hold.py Thu Jun 9 13:12:12 2005 @@ -274,7 +274,8 @@ dmsg['Sender'] = requestaddr dmsg['From'] = requestaddr nmsg.attach(text) - nmsg.attach(MIMEMessage(msg)) + if mlist.moderate_inc_body: + nmsg.attach(MIMEMessage(msg)) nmsg.attach(MIMEMessage(dmsg)) nmsg.send(mlist, **{'tomoderators': 1}) finally: diff -ruP --exclude=.DS_Store mailman-2.1.6/Mailman/MailList.py mailman-2.1.6-modinc/Mailman/MailList.py --- mailman-2.1.6/Mailman/MailList.py Wed Feb 16 00:21:41 2005 +++ mailman-2.1.6-modinc/Mailman/MailList.py Thu Jun 9 13:12:12 2005 @@ -353,6 +353,7 @@ self.obscure_addresses = mm_cfg.DEFAULT_OBSCURE_ADDRESSES self.admin_member_chunksize = mm_cfg.DEFAULT_ADMIN_MEMBER_CHUNKSIZE self.administrivia = mm_cfg.DEFAULT_ADMINISTRIVIA + self.moderate_inc_body = mm_cfg.DEFAULT_MODERATE_INC_BODY self.preferred_language = mm_cfg.DEFAULT_SERVER_LANGUAGE self.available_languages = [] self.include_rfc2369_headers = 1 diff -ruP --exclude=.DS_Store mailman-2.1.6/Mailman/Version.py mailman-2.1.6-modinc/Mailman/Version.py --- mailman-2.1.6/Mailman/Version.py Mon May 30 21:09:07 2005 +++ mailman-2.1.6-modinc/Mailman/Version.py Thu Jun 9 13:17:25 2005 @@ -36,7 +36,9 @@ (REL_LEVEL << 4) | (REL_SERIAL << 0)) # config.pck schema version number -DATA_FILE_VERSION = 95 +# DATA_FILE_VERSION = 95 +# 95.1 to take account of extra moderate_inc_body list attribute +DATA_FILE_VERSION = 95.1 # qfile/*.db schema version number QFILE_SCHEMA_VERSION = 3