+<?php
+
+/***************************************************************************\
+ * SPIP, Systeme de publication pour l'internet *
+ * *
+ * Copyright (c) 2001-2010 *
+ * Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James *
+ * *
+ * Ce programme est un logiciel libre distribue sous licence GNU/GPL. *
+ * Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne. *
+\***************************************************************************/
+
+if (!defined("_ECRIRE_INC_VERSION")) return;
+
+include_spip('inc/presentation');
+
+// http://doc.spip.org/@exec_poster_forum_prive_dist
+function exec_poster_forum_prive_dist()
+{
+ forum_envoi(
+ intval(_request('id')),
+ intval(_request('id_parent')),
+ _request('script'),
+ _request('statut'),
+ _request('titre_message'),
+ _request('texte'),
+ _request('modif_forum'),
+ _request('nom_site'),
+ _request('url_site'));
+}
+
+// http://doc.spip.org/@forum_envoi
+function forum_envoi(
+ $id,
+ $id_parent,
+ $script,
+ $statut,
+ $titre_message,
+ $texte,
+ $modif_forum,
+ $nom_site,
+ $url_site)
+{
+ if ($modif_forum == 'fin') {
+ include_spip('inc/headers');
+ $script = preg_replace('/\W/','', $script); // article etc
+ $objet = preg_replace('/\W/','', $texte); // id_article etc
+ redirige_url_ecrire('discuter', "script=$script&objet=$objet&$objet=$id&statut=$statut" . ($id_parent ? "&id_parent=$id_parent" : ''));
+ } else {
+ $statut = preg_replace('/\W/','', $statut);
+ $forum_envoi = charger_fonction('forum_envoi', 'inc');
+ $forum_envoi = $forum_envoi($id, $id_parent, $script, $statut, $titre_message, $texte, $modif_forum, $nom_site, $url_site);
+
+ if (_AJAX) {
+ ajax_retour($forum_envoi);
+ } else {
+ $titre = $script == 'message' ? _T('onglet_messagerie') : _T('titre_cadre_forum_interne');
+ $commencer_page = charger_fonction('commencer_page', 'inc');
+ echo $commencer_page(_T('texte_nouveau_message'), "accueil", "accueil");
+ echo debut_gauche('', true);
+ echo debut_droite('', true);
+ echo gros_titre($titre,'', false);
+ echo $forum_envoi, fin_gauche(), fin_page();
+ }
+ }
+}
+?>