<?php
/***************************************************************************
- * Copyright (C) 2003-2009 Polytechnique.org *
+ * Copyright (C) 2003-2010 Polytechnique.org *
* http://opensource.polytechnique.org/ *
* *
* This program is free software; you can redistribute it and/or modify *
S::i('uid'));
while (list($sub, $domain) = $res->next()) {
if (array_shift($subs) == "$sub@$domain") {
- list($sub, $domain) = explode('@', $list);
if ($domain != $current_domain) {
$current_domain = $domain;
- $client = new MMList(S::v('uid'), S::v('password'), $domain);
}
+ $client = new MMList(S::user(), $domain);
$client->subscribe($sub);
}
}
while (list($sub, $domain) = $res->next()) {
if ($current_domain != $domain) {
$current_domain = $domain;
- $client = new MMList(S::v('uid'), S::v('password'), $domain);
+ $client = new MMList(S::user(), $domain);
}
list($details, ) = $client->get_members($sub);
$lists["$sub@$domain"] = $details;