+ if (Post::v('add_to_nl')) {
+ require_once 'newsletter.inc.php';
+ subscribe_nl();
+ }
+ if (Post::v('add_to_promo')) {
+ $r = XDB::query('SELECT id FROM groupex.asso WHERE diminutif = {?}',
+ S::v('promo'));
+ $asso_id = $r->fetchOneCell();
+ XDB::execute('REPLACE INTO groupex.membres (uid,asso_id)
+ VALUES ({?}, {?})',
+ S::v('uid'), $asso_id);
+ require_once 'lists.inc.php';
+ $client =& lists_xmlrpc(S::v('uid'), S::v('password'));
+ $client->subscribe("promo".S::v('promo'));
+ }