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 function formulaires_configurer_annonces_charger_dist(){
19 "adresse_suivi_inscription",
25 $valeurs[$m] = $GLOBALS['meta'][$m];
30 function formulaires_configurer_annonces_verifier_dist(){
32 if (_request('suivi_edito')=='oui') {
33 if (!$email=_request('adresse_suivi'))
34 $erreurs['adresse_suivi'] = _T('info_obligatoire');
36 include_spip('inc/filtres');
37 if (!email_valide($email))
38 $erreurs['adresse_suivi'] = _T('form_prop_indiquer_email');
41 if (_request('quoi_de_neuf')=='oui') {
42 if (!$email=_request('adresse_neuf'))
43 $erreurs['adresse_neuf'] = _T('info_obligatoire');
45 include_spip('inc/filtres');
46 if (!email_valide($email))
47 $erreurs['adresse_neuf'] = _T('form_prop_indiquer_email');
49 if (!$email=_request('jours_neuf'))
50 $erreurs['jours_neuf'] = _T('info_obligatoire');
55 function formulaires_configurer_annonces_traiter_dist(){
56 $res = array('editable'=>true);
61 if (!is_null($v=_request($m)))
62 ecrire_meta($m, $v=='oui'?
'oui':'non');
66 "adresse_suivi_inscription",
71 if (!is_null($v=_request($m)))
74 $res['message_ok'] = _T('config_info_enregistree');
75 // provoquer l'envoi des nouveautes en supprimant le fichier lock
76 if (_request('envoi_now')) {
77 effacer_meta('dernier_envoi_neuf');
78 $id_job = job_queue_add("mail","Test Envoi des nouveautes",array(0),"genie/");
79 include_spip('inc/queue');
80 queue_schedule(array($id_job));
81 $res['message_ok'] .= "<br />"._T("info_liste_nouveautes_envoyee");