3 /***************************************************************************\
4 * SPIP, Systeme de publication pour l'internet *
6 * Copyright (c) 2001-2011 *
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;
15 // Modifier le reglage des forums publics de l'article x
16 // http://doc.spip.org/@action_regler_moderation_dist
17 function action_regler_moderation_dist()
19 include_spip('inc/autoriser');
21 $securiser_action = charger_fonction('securiser_action', 'inc');
22 $arg = $securiser_action();
24 if (!preg_match(",^\W*(\d+)$,", $arg, $r)) {
25 spip_log("action_regler_moderation_dist $arg pas compris");
30 if (!autoriser('modererforum', 'article', $id_article))
33 $statut = _request('change_accepter_forum');
34 sql_updateq("spip_articles", array("accepter_forum" => $statut), "id_article=". $id_article);
35 if ($statut == 'abo') {
36 ecrire_meta('accepter_visiteurs', 'oui');
38 include_spip('inc/invalideur');
39 suivre_invalideur("id='id_forum/a$id_article'");