[SPIP] +2.1.12
[velocampus/web/www.git] / www / ecrire / exec / delete_statistiques.php
diff --git a/www/ecrire/exec/delete_statistiques.php b/www/ecrire/exec/delete_statistiques.php
new file mode 100644 (file)
index 0000000..18f90cd
--- /dev/null
@@ -0,0 +1,30 @@
+<?php
+
+/***************************************************************************\
+ *  SPIP, Systeme de publication pour l'internet                           *
+ *                                                                         *
+ *  Copyright (c) 2001-2011                                                *
+ *  Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James  *
+ *                                                                         *
+ *  Ce programme est un logiciel libre distribue sous licence GNU/GPL.     *
+ *  Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne.   *
+\***************************************************************************/
+
+if (!defined('_ECRIRE_INC_VERSION')) return;
+
+// http://doc.spip.org/@exec_delete_statistiques_dist
+function exec_delete_statistiques_dist()
+{
+       include_spip('inc/autoriser');
+       if (!autoriser('detruire','statistiques')) {
+               include_spip('inc/minipres');
+               echo minipres();
+       } else {
+               include_spip('inc/headers');
+               $admin = charger_fonction('admin', 'inc');
+               $res = $admin('delete_statistiques', _T('bouton_effacer_statistiques'), '');
+               if ($res) echo $res; else redirige_url_ecrire('statistiques_visites','');
+               
+       }
+}
+?>