[Sommaire] [Imprimer]

   1  <?php
   2  
   3  /***************************************************************************\
   4   *  SPIP, Systeme de publication pour l'internet                           *
   5   *                                                                         *
   6   *  Copyright (c) 2001-2007                                                *
   7   *  Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James  *
   8   *                                                                         *
   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  \***************************************************************************/
  12  
  13  if (!defined("_ECRIRE_INC_VERSION")) return;
  14  
  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()
  18  {
  19      include_spip('inc/autoriser');
  20  
  21      $securiser_action = charger_fonction('securiser_action', 'inc');
  22      $arg = $securiser_action();
  23  
  24      if (!preg_match(",^\W*(\d+)$,", $arg, $r)) {
  25          spip_log("action_regler_moderation_dist $arg pas compris");
  26          return;
  27      }
  28  
  29      $id_article = $r[1];
  30      if (!autoriser('modifier', 'article', $id_article))
  31          return;
  32  
  33      $statut = _request('change_accepter_forum');
  34      spip_query("UPDATE spip_articles SET accepter_forum='$statut' WHERE id_article=". $id_article);
  35      if ($statut == 'abo') {
  36          ecrire_meta('accepter_visiteurs', 'oui');
  37          ecrire_metas();
  38      }
  39      include_spip('inc/invalideur');
  40      suivre_invalideur("id='id_forum/a$id_article'");
  41  }
  42  ?>