[FIX] Don't send mail to opt-outed contacts in mass mailing
This commit is contained in:
parent
9d2dbda8ca
commit
2d260b78d8
|
@ -513,7 +513,7 @@ class MassMailing(osv.Model):
|
||||||
elif len(item) == 3:
|
elif len(item) == 3:
|
||||||
mailing_list_ids |= set(item[2])
|
mailing_list_ids |= set(item[2])
|
||||||
if mailing_list_ids:
|
if mailing_list_ids:
|
||||||
value['mailing_domain'] = "[('list_id', 'in', %s)]" % list(mailing_list_ids)
|
value['mailing_domain'] = "[('list_id', 'in', %s), ('opt_out', '=', False)]" % list(mailing_list_ids)
|
||||||
else:
|
else:
|
||||||
value['mailing_domain'] = "[('list_id', '=', False)]"
|
value['mailing_domain'] = "[('list_id', '=', False)]"
|
||||||
else:
|
else:
|
||||||
|
|
Loading…
Reference in New Issue