lainwir3d/dolibarr
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

ajout des listes des cotisants pour les desinscription aux mailing-listes

Browse Source
This commit is contained in:
jlb 2003-09-02 10:56:10 +00:00
parent fd3fb96086
commit 04c7b5f3b1
1 changed files with 7 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
htdocs/adherents/adherent.class.php
View File

@ -1068,13 +1068,19 @@ class Adherent
} }
/*
* desonscription de toutes les listes mailman (utile lors de
* resiliation d'adhesion)
*/
Function del_to_mailman($listes='') Function del_to_mailman($listes='')
{ {
if (defined("ADHERENT_MAILMAN_UNSUB_URL") && ADHERENT_MAILMAN_UNSUB_URL != '' && defined("ADHERENT_MAILMAN_LISTS") && ADHERENT_MAILMAN_LISTS != '') if (defined("ADHERENT_MAILMAN_UNSUB_URL") && ADHERENT_MAILMAN_UNSUB_URL != '' && defined("ADHERENT_MAILMAN_LISTS") && ADHERENT_MAILMAN_LISTS != '')
{ {
if ($listes==''){ if ($listes==''){
$lists=explode(',',ADHERENT_MAILMAN_LISTS); $lists=explode(',',ADHERENT_MAILMAN_LISTS);
if (defined("ADHERENT_MAILMAN_LISTS_cotisant") && ADHERENT_MAILMAN_LISTS !=''){
$lists=array_merge ($lists,explode(',',ADHERENT_MAILMAN_LISTS_COTISANT));
}
}else{ }else{
$lists=explode(',',$listes); $lists=explode(',',$listes);
} }