Comment 3 for bug 640696

I think this will work as a cleanup script.
-- Discard list messages that claim to have been sent from the list.
-- status = DISCARD_PENDING = 60
-- disposed_by = janitor = 931129
UPDATE
    MessageApproval
SET
    status = 60,
    disposed_by = 931129,
    disposal_date = CURRENT_TIMESTAMP
FROM
    Person Team
    JOIN MailingList ON Team.id = MailingList.team
WHERE
    MailingList.id = MessageApproval.mailing_list
    AND MessageApproval.posted_by = Team.id
    AND MessageApproval.status = 0
;