Subversion Repositories Applications.papyrus

<?php

include_once 'ezmlm-php-2.0/ezmlm.php' ;


// Parametrage de la liste
$message = new ezmlm_msgdisplay();
if (!$message) return 'Les fichiers de la liste ne sont pas visible sur le serveur' ;
$message->forcehref = $url;
$message->listdir = '/home/vpopmail/domains/'.$domaine.'/'.$liste ;
$message->listname = $liste;
$message->listdomain = $domaine ;
$id_rep = $actionargs[0] ;
$num_message = $actionargs[1] ;
if ($id_rep =='' || $num_message == '') exit();


$html = $message->display ($id_rep.'/'.$num_message) ;

include_once 'XML/Util.php' ;

$xml = XML_Util::getXMLDeclaration('1.0', 'ISO-8859-15', 'no') ;

if (!$html) {
        $xml .= XML_Util::createStartElement ('erreur') ;
        $xml .= 'Le message n\'existe pas';
        $xml .= XML_Util::createEndElement('erreur') ;
        header ('Content-type: text/xml');
        echo $xml;
        exit();
}



$xml .= XML_Util::createStartElement ('ezmlm_message', array('domaine' => $domaine, 'liste' => $liste, 'langue' => $langue)) ;

$xml .= "\n".'<![CDATA[ '.$html.']]>';
$info_suivant = $message->getInfoSuivant() ;
$xml .= XML_Util::createStartElement ('message_suivant', array ('numero' => $info_suivant['fichier_suivant'],
                                                                'numero_repertoire' => $info_suivant['repertoire_suivant'])) ;
$xml .= XML_Util::createEndElement('message_suivant') ;

$xml .= XML_Util::createStartElement ('message_precedent', array ('numero' => $info_suivant['fichier_precedent'],
                                                                'numero_repertoire' => $info_suivant['repertoire_precedent'])) ;
$xml .= XML_Util::createEndElement('message_precedent') ;
        
$xml .= XML_Util::createEndElement('ezmlm_message') ;
header ('Content-type: text/xml');
echo $xml ;
?>