X-Git-Url: http://git.polytechnique.org/?a=blobdiff_plain;f=classes%2Fmmlist.php;h=999e5de21be174e2ed244b3976f48702ed15865e;hb=6f58e0613a47d9eeb5004c992e6c59b7cf9ec0ea;hp=a16b1c6c83a7432275b095c20e953c93f5ef2c61;hpb=08fa70684fd1332178cddb6b318151335fb4506c;p=platal.git

diff --git a/classes/mmlist.php b/classes/mmlist.php
index a16b1c6..999e5de 100644
--- a/classes/mmlist.php
+++ b/classes/mmlist.php
@@ -1,6 +1,6 @@
 <?php
 /***************************************************************************
- *  Copyright (C) 2003-2008 Polytechnique.org                              *
+ *  Copyright (C) 2003-2009 Polytechnique.org                              *
  *  http://opensource.polytechnique.org/                                   *
  *                                                                         *
  *  This program is free software; you can redistribute it and/or modify   *
@@ -21,9 +21,16 @@
 
 class MMList extends XmlrpcClient
 {
-    public function __construct($uid, $pass, $fqdn = null)
+    public function __construct($user, $pass = null, $fqdn = null)
     {
         global $globals;
+        if ($user instanceof PlUser) {
+            $fqdn = $pass;
+            $uid  = $user->id();
+            $pass = $user->password();
+        } else {
+            $uid = $user;
+        }
 
         $dom = is_null($fqdn) ? $globals->mail->domain : $fqdn;
         $url = "http://$uid:$pass@{$globals->lists->rpchost}:{$globals->lists->rpcport}/$dom";