backport

Patches applied:

 * opensource@polytechnique.org--2005/platal--release--0.9.6--patch-37
   fix big bug wrt asso without any domain

git-archimport-id: opensource@polytechnique.org--2005/platal--mainline--0.9--patch-687

diff --git a/htdocs.net/groupe/membres-edit.php b/htdocs.net/groupe/membres-edit.php
index 2dd6f1e..600933d 100644 (file)
--- a/htdocs.net/groupe/membres-edit.php
+++ b/htdocs.net/groupe/membres-edit.php
@@ -147,26 +147,29 @@
         $page->assign('user', $user);
 
         if (Post::has('confirm')) {
-            require 'lists.inc.php';
-            $client =& lists_xmlrpc(Session::getInt('uid'), Session::get('password'), $globals->asso('mail_domain'));
-            $listes = $client->get_lists($user['email2']);
-
-            foreach ($listes as $liste) {
-                if ($liste['sub'] == 2) {
-                    $client->mass_unsubscribe($liste['list'], Array($user['email2']));
-                    $page->trig("{$user['prenom']} {$user['nom']} a été désinscrit de {$liste['list']}");
-                } elseif ($liste['sub']) {
-                    $page->trig("{$user['prenom']} {$user['nom']} a une demande d'inscription en cours sur la liste {$liste['list']}@ !");
+            if ($domain = $globals->asso('mail_domain')) {
+            
+                require 'lists.inc.php';
+                $client =& lists_xmlrpc(Session::getInt('uid'), Session::get('password'), $domain);
+                $listes = $client->get_lists($user['email2']);
+
+                foreach ($listes as $liste) {
+                    if ($liste['sub'] == 2) {
+                        $client->mass_unsubscribe($liste['list'], Array($user['email2']));
+                        $page->trig("{$user['prenom']} {$user['nom']} a été désinscrit de {$liste['list']}");
+                    } elseif ($liste['sub']) {
+                        $page->trig("{$user['prenom']} {$user['nom']} a une demande d'inscription en cours sur la liste {$liste['list']}@ !");
+                    }
                 }
-            }
 
-            $globals->xdb->execute(
-                    "DELETE FROM  virtual_redirect
-                           USING  virtual_redirect
-                      INNER JOIN  virtual USING(vid)
-                           WHERE  redirect={?} AND alias LIKE {?}", $user['email'], '%@'.$globals->asso('mail_domain'));
-            if (mysql_affected_rows()) {
-                $page->trig("{$user['prenom']} {$user['nom']} a été désabonné des alias du groupe !");
+                $globals->xdb->execute(
+                        "DELETE FROM  virtual_redirect
+                               USING  virtual_redirect
+                          INNER JOIN  virtual USING(vid)
+                               WHERE  redirect={?} AND alias LIKE {?}", $user['email'], '%@'.$domain);
+                if (mysql_affected_rows()) {
+                    $page->trig("{$user['prenom']} {$user['nom']} a été désabonné des alias du groupe !");
+                }
             }
 
             $globals->xdb->execute(