Subversion Repositories Applications.papyrus

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
1336 neiluj 1
<?php
2
 
3
include_once 'ezmlm-php-2.0/ezmlm.php' ;
4
 
5
 
6
// Parametrage de la liste
7
$info = new ezmlm_listinfo();
8
if (!$info) return 'Les fichiers de la liste ne sont pas visible sur le serveur' ;
9
$info->forcehref = $url;
10
$info->listdir = '/home/vpopmail/domains/'.$domaine.'/'.$liste ;
11
$info->listname = $liste;
12
$info->listdomain = $domaine ;
13
 
14
ob_start() ;
15
if (!$info->show_recentmsgs()) {
1382 alexandre_ 16
    if (!$info) {
17
    	ob_end_clean() ;
18
    	echo 'Les fichiers de la liste ne sont pas visible sur le serveur' ;
19
    	exit();
20
    }
1336 neiluj 21
}
22
$html = ob_get_contents() ;
23
ob_end_clean() ;
24
 
25
include_once 'XML/Util.php' ;
26
 
27
$xml = XML_Util::getXMLDeclaration('1.0', 'ISO-8859-15', 'no') ;
28
 
29
$xml .= XML_Util::createStartElement ('ezmlm_derniers_messages', array('domaine' => $domaine, 'liste' => $liste, 'langue' => $langue)) ;
30
 
31
$xml .= '<![CDATA[ '.$html.']]>';
32
 
33
$xml .= XML_Util::createEndElement('ezmlm_derniers_messages') ;
34
header ('Content-type: text/xml');
35
echo $xml ;
36
?>