laposte.net , http://bloog.net */
/* */
/* Ce programme est libre, vous pouvez le redistribuer et/ou le modifier selon les termes */
/* de la Licence Publique G��ale GNU publi� par la Free Software Foundation */
/* (version 2). */
/* */
/* Ce programme est distribu�car potentiellement utile, mais SANS AUCUNE GARANTIE, */
/* ni explicite ni implicite, y compris les garanties de commercialisation ou */
/* d'adaptation dans un but sp�ifique. Reportez-vous �la Licence Publique G��ale GNU */
/* pour plus de d�ails. */
/* */
/* Vous devez avoir re� une copie de la Licence Publique G��ale GNU */
/* en m�e temps que ce programme ; si ce n'est pas le cas, �rivez �la */
/* Free Software Foundation, */
/* Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307, �ats-Unis. */
/******************************************************************************************/
if (!defined("_ECRIRE_INC_VERSION")) return;
include_spip('inc/presentation');
include_spip('inc/barre');
include_spip('inc/affichage');
include_spip('base/spip-listes');
include_spip('public/assembler');
function exec_courrier_edit(){
global $connect_statut;
global $connect_toutes_rubriques;
global $connect_id_auteur;
$type = _request('type');
$id_message = _request('id_message');
$nomsite=lire_meta("nom_site");
$urlsite=lire_meta("adresse_site");
if (_request('new') == "oui") {
$statut = 'redac';
$type = 'nl';
$result = spip_query("INSERT INTO spip_courriers (titre, date, statut, type, id_auteur) VALUES ("._q(_T('texte_nouveau_message')).", NOW(),"._q($statut).","._q($type).","._q($connect_id_auteur).")");
$id_message = spip_insert_id();
}
// Admin SPIP-Listes
echo debut_page(_T('spiplistes:spip_listes'), "redacteurs", "spiplistes");
if ($connect_statut != "0minirezo" ) {
echo ""._T('spiplistes:acces_a_la_page')."
";
echo fin_page();
exit;
}
if (($connect_statut == "0minirezo") OR ($connect_id_auteur == $id_auteur)) {
$statut_auteur=$statut;
spip_listes_onglets("messagerie", _T('spiplistes:spip_listes'));
}
debut_gauche();
spip_listes_raccourcis();
creer_colonne_droite();
debut_droite("messagerie");
// MODE EDIT: Redaction d'un courrier ------------------------------------------
$result = spip_query("SELECT * FROM spip_courriers WHERE id_courrier="._q($id_message));
if ($row = spip_fetch_array($result)) {
$id_message = $row['id_courrier'];
$date_heure = $row["date"];
$titre = entites_html($row["titre"]);
$texte = entites_html($row["texte"]);
$type = $row["type"];
$statut = $row["statut"];
$expediteur = $row["id_auteur"];
if (!($expediteur == $connect_id_auteur OR ($type == 'nl' AND $connect_statut == '0minirezo')))
die();
}
if ($type == 'nl') $le_type = _T('spiplistes:email_collec');
echo "$le_type
";
echo ""._T('spiplistes:alerte_edit')."
";
echo debut_cadre_relief(_DIR_PLUGIN_SPIPLISTES.'img_pack/stock_insert-slide.gif');
//Charger un patron ?
// inclusion du script de gestion des layers de SPIP
if($texte ==''){
// Titre du bloc
echo bouton_block_visible(md5(_T('spiplistes:charger_patron')));
echo ""._T('spiplistes:charger_patron')."";
// Bloc invisible
echo debut_block_visible(md5(_T('spiplistes:charger_patron')));
}
else {
// Titre du bloc
echo bouton_block_invisible(md5(_T('spiplistes:charger_patron')));
echo ""._T('spiplistes:charger_patron')."";
// Bloc invisible
echo debut_block_invisible(md5(_T('spiplistes:charger_patron')));
}
echo "";
echo "
";
// Fin du bloc
echo fin_block();
echo fin_cadre_relief();
echo "
";
echo "";
// MODE EDIT FIN ---------------------------------------------------------------
echo "".$GLOBALS['spiplistes_version']."
" ;
echo fin_gauche(), fin_page();
}
/******************************************************************************************/
/* SPIP-listes est un syst�e de gestion de listes d'abonn� et d'envoi d'information */
/* par email pour SPIP. */
/* Copyright (C) 2004 Vincent CARON v.caronlaposte.net , http://bloog.net */
/* */
/* Ce programme est libre, vous pouvez le redistribuer et/ou le modifier selon les termes */
/* de la Licence Publique G��ale GNU publi� par la Free Software Foundation */
/* (version 2). */
/* */
/* Ce programme est distribu�car potentiellement utile, mais SANS AUCUNE GARANTIE, */
/* ni explicite ni implicite, y compris les garanties de commercialisation ou */
/* d'adaptation dans un but sp�ifique. Reportez-vous �la Licence Publique G��ale GNU */
/* pour plus de d�ails. */
/* */
/* Vous devez avoir re� une copie de la Licence Publique G��ale GNU */
/* en m�e temps que ce programme ; si ce n'est pas le cas, �rivez �la */
/* Free Software Foundation, */
/* Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307, �ats-Unis. */
/******************************************************************************************/
?>