794e7bb0bca2290abf135bfdfccb3dbeaef25b08
3 /***************************************************************************\
4 * SPIP, Systeme de publication pour l'internet *
6 * Copyright (c) 2001-2013 *
7 * Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James *
9 * Ce programme est un logiciel libre distribue sous licence GNU/GPL. *
10 * Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne. *
11 \***************************************************************************/
13 if (!defined('_ECRIRE_INC_VERSION')) return;
17 * @param int $id_message
20 function action_envoyer_message_dist($id_message=null){
22 if (is_null($id_message)){
23 $securiser_action = charger_fonction('securiser_action','inc');
24 $id_message = $securiser_action();
27 include_spip('inc/autoriser');
28 if (intval($id_message)
29 AND $type=sql_getfetsel('type','spip_messages','id_message='.intval($id_message))
30 AND autoriser('envoyermessage',$type, $id_message)){
32 include_spip('action/editer_objet');
33 objet_modifier('message',$id_message,array('statut'=>'publie'));