3 /***************************************************************************\
4 * SPIP, Systeme de publication pour l'internet *
6 * Copyright (c) 2001-2014 *
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 // http://doc.spip.org/@action_supprimer_traduction_dist
16 function action_supprimer_traduction_dist() {
18 $securiser_action = charger_fonction('securiser_action', 'inc');
19 $arg = $securiser_action();
21 if (!preg_match(",^(\d+)\D(\d+)$,", $arg, $r))
22 spip_log("action supprimer_traduction: $arg pas compris");
23 else action_supprimer_traduction_post($r);
26 // http://doc.spip.org/@action_supprimer_traduction_post
27 function action_supprimer_traduction_post($r)
29 sql_updateq("spip_articles", array("id_trad" => 0), "id_article=" . $r[1]);
30 // Si l'ancien groupe ne comporte plus qu'un seul article
33 $cpt = sql_countsel("spip_articles", "id_trad=" . $r[2]);
36 sql_updateq("spip_articles", array("id_trad" => 0), "id_trad=" . $r[2]);