3 /***************************************************************************\
4 * SPIP, Systeme de publication pour l'internet *
6 * Copyright (c) 2001-2019 *
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 \***************************************************************************/
14 * Gestion de l'action confirmer_email
16 * @package SPIP\Core\Inscription
19 if (!defined('_ECRIRE_INC_VERSION')) {
24 * Confirmer un changement d'email
26 * @global array $GLOBALS ['visiteur_session']
27 * @global string $GLOBALS ['redirect']
30 function action_confirmer_email_dist() {
31 $securiser_action = charger_fonction('securiser_action', 'inc');
32 $arg = $securiser_action();
34 include_spip('inc/filtres');
35 if ($GLOBALS['visiteur_session']['id_auteur'] and email_valide($arg)) {
36 include_spip('action/editer_auteur');
37 auteur_modifier($GLOBALS['visiteur_session']['id_auteur'], array('email' => $arg));
39 // verifier avant de rediriger pour invalider le message de confirmation
40 // si ca n'a pas marche
41 if ($redirect = _request('redirect') and !$arg == sql_getfetsel('email', 'spip_auteurs',
42 'id_auteur=' . intval($GLOBALS['visiteur_session']))
44 $GLOBALS['redirect'] = parametre_url($redirect, 'email_modif', '');