* 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA *
***************************************************************************/
-// {{{ import class definitions
-
-require_once dirname(__FILE__).'/../classes/XmlrpcClient.php';
-
-// }}}
// {{{ function lists_xmlrpc
function &lists_xmlrpc($uid, $pass, $fqdn=null)
global $globals;
$membres = Array();
-
+
foreach($members as $mem) {
list($m, $dom) = explode('@',$mem);
if ($dom == $globals->mail->domain || $dom == $globals->mail->domain2) {
WHERE a.alias = {?}', $m);
if(list($prenom, $nom, $promo) = $res->fetchOneRow()) {
$key = $tri_promo ? $promo : strtoupper($nom{0});
- $membres[$key][$nom.$m] = Array('n' => "$prenom $nom", 'l' => $m);
+ $membres[$key][$nom.$m] = Array('n' => "$prenom $nom", 'l' => $m, 'p' => (!$tri_promo ? $promo : null));
} else {
$membres[0][] = Array('l' => $mem);
}
$res = XDB::query('SELECT prenom, nom FROM groupex.membres WHERE email={?}', $mem);
if (list($prenom, $nom) = $res->fetchOneRow()) {
$key = $tri_promo ? 0 : strtoupper($nom{0});
- $membres[$key][$nom.$m] = Array('n' => "$prenom $nom", 'l' => $mem);
+ $membres[$key][$nom.$m] = Array('n' => "$prenom $nom", 'l' => $mem, 'p' => (!$tri_promo ? 'non-X' : null));
} else {
$membres[0][] = Array('l' => $mem);
}
}
}
-
+
ksort($membres);
foreach($membres as $key=>$val) ksort($membres[$key]);
return $membres;
}
// }}}
+// {{{ function list_header_decode
+
+function _list_header_decode($charset, $c, $str) {
+ $s = ($c == 'Q' || $c == 'q') ? quoted_printable_decode($str) : base64_decode($str);
+ $s = iconv($charset, 'iso-8859-15', $s);
+ return str_replace('_', ' ', $s);
+}
+
+function list_header_decode($value) {
+ $val = preg_replace('/(=\?[^?]*\?[BQbq]\?[^?]*\?=) (=\?[^?]*\?[BQbq]\?[^?]*\?=)/', '\1\2', $value);
+ return preg_replace('/=\?([^?]*)\?([BQbq])\?([^?]*)\?=/e', '_list_header_decode("\1", "\2", "\3")', $val);
+}
+
+// }}}
// vim:set et sw=4 sts=4 sws=4 foldmethod=marker:
?>