Subversion Repositories Applications.projet

Rev

Rev 208 | Rev 316 | Go to most recent revision | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

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