www/plugins-dist/mots/action/supprimer_groupe_mots.php

   1 <?php
   2
   3 /***************************************************************************\
   4  *  SPIP, Systeme de publication pour l'internet                           *
   5  *                                                                         *
   6  *  Copyright (c) 2001-2019                                                *
   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 /**
  14  * Gestion de l'action supprimer_groupe_mots
  15  *
  16  * @package SPIP\Mots\Actions
  17  */
  18 if (!defined('_ECRIRE_INC_VERSION')) {
  19         return;
  20 }
  21
  22 include_spip('inc/filtres');
  23
  24 /**
  25  * Action supprimant un groupe de mots clés dans la base de données
  26  * dont l'identifiant du groupe est donné en paramètre de cette fonction
  27  * ou en argument de l'action sécurisée
  28  *
  29  * Supprime le groupe uniquement si on en a l'autorisation. Cela implique
  30  * qu'il n'y ait pas de mots clés dans le groupe.
  31  *
  32  * @param null|int $id_groupe
  33  *     Identifiant du groupe à supprimer. En absence utilise l'argument
  34  *     de l'action sécurisée.
  35  */
  36 function action_supprimer_groupe_mots_dist($id_groupe = null) {
  37
  38         if (is_null($id_groupe)) {
  39                 $securiser_action = charger_fonction('securiser_action', 'inc');
  40                 $id_groupe = $securiser_action();
  41         }
  42
  43         include_spip('inc/autoriser');
  44         if (autoriser('supprimer', 'groupemots', $id_groupe)) {
  45                 sql_delete('spip_groupes_mots', 'id_groupe=' . intval($id_groupe));
  46         } else {
  47                 spip_log("action_supprimer_groupe_mots_dist $id_groupe interdit", _LOG_INFO_IMPORTANTE);
  48         }
  49 }