1
0
Fork 0
mirror of https://github.com/YunoHost-Apps/spip_ynh.git synced 2024-09-03 20:25:59 +02:00
spip_ynh/sources/plugins-dist/statistiques/exec/base_delete_referers.php
2015-04-28 17:10:23 +02:00

30 lines
1.1 KiB
PHP

<?php
/***************************************************************************\
* SPIP, Systeme de publication pour l'internet *
* *
* Copyright (c) 2001-2014 *
* 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;
function exec_base_delete_referers_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_referers', _T('statistiques:bouton_effacer_referers'), '');
if ($res) echo $res; else redirige_url_ecrire('stats_referers','');
}
}
?>