1 | <?php |
---|
2 | |
---|
3 | /******************************************************************************************/ |
---|
4 | /* SPIP-listes est un système de gestion de listes d'information par email pour SPIP */ |
---|
5 | /* Copyright (C) 2004 Vincent CARON v.caron<at>laposte.net , http://bloog.net */ |
---|
6 | /* */ |
---|
7 | /* Ce programme est libre, vous pouvez le redistribuer et/ou le modifier selon les termes */ |
---|
8 | /* de la Licence Publique Générale GNU publiée par la Free Software Foundation */ |
---|
9 | /* (version 2). */ |
---|
10 | /* */ |
---|
11 | /* Ce programme est distribué car potentiellement utile, mais SANS AUCUNE GARANTIE, */ |
---|
12 | /* ni explicite ni implicite, y compris les garanties de commercialisation ou */ |
---|
13 | /* d'adaptation dans un but spécifique. Reportez-vous à la Licence Publique Générale GNU */ |
---|
14 | /* pour plus de détails. */ |
---|
15 | /* */ |
---|
16 | /* Vous devez avoir reçu une copie de la Licence Publique Générale GNU */ |
---|
17 | /* en même temps que ce programme ; si ce n'est pas le cas, écrivez à la */ |
---|
18 | /* Free Software Foundation, */ |
---|
19 | /* Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307, États-Unis. */ |
---|
20 | /******************************************************************************************/ |
---|
21 | |
---|
22 | |
---|
23 | if (!defined("_ECRIRE_INC_VERSION")) return; |
---|
24 | |
---|
25 | include_spip('inc/presentation'); |
---|
26 | include_spip('inc/affichage'); |
---|
27 | |
---|
28 | |
---|
29 | function exec_listes_toutes(){ |
---|
30 | |
---|
31 | global $connect_statut; |
---|
32 | global $connect_toutes_rubriques; |
---|
33 | global $connect_id_auteur; |
---|
34 | |
---|
35 | $nomsite=lire_meta("nom_site"); |
---|
36 | $urlsite=lire_meta("adresse_site"); |
---|
37 | |
---|
38 | // Admin SPIP-Listes |
---|
39 | echo debut_page(_T('spiplistes:spip_listes'), "redacteurs", "spiplistes"); |
---|
40 | |
---|
41 | if (!function_exists('spip_listes_onglets')){ |
---|
42 | echo(_T('spiplistes:erreur_install')); |
---|
43 | echo fin_page(); |
---|
44 | exit; |
---|
45 | } |
---|
46 | |
---|
47 | if ($connect_statut != "0minirezo" ) { |
---|
48 | echo "<p><b>"._T('spiplistes:acces_a_la_page')."</b></p>"; |
---|
49 | echo fin_page(); |
---|
50 | exit; |
---|
51 | } |
---|
52 | |
---|
53 | if (($connect_statut == "0minirezo") OR ($connect_id_auteur == $id_auteur)) { |
---|
54 | $statut_auteur=$statut; |
---|
55 | spip_listes_onglets("messagerie", _T('spiplistes:spip_listes')); |
---|
56 | } |
---|
57 | |
---|
58 | debut_gauche(); |
---|
59 | |
---|
60 | spip_listes_raccourcis(); |
---|
61 | |
---|
62 | creer_colonne_droite(); |
---|
63 | |
---|
64 | debut_droite("messagerie"); |
---|
65 | |
---|
66 | |
---|
67 | // MODE LISTES: afficher les listes -------------------------------------------- |
---|
68 | |
---|
69 | /* |
---|
70 | debut_cadre_relief('forum-interne-24.gif'); |
---|
71 | |
---|
72 | echo _T('spiplistes:nb_abonnes')."$nb_abonnes<p>"; |
---|
73 | echo "<p>"; |
---|
74 | fin_cadre_relief(); |
---|
75 | */ |
---|
76 | |
---|
77 | echo "<p>"; |
---|
78 | |
---|
79 | // |
---|
80 | // Afficher tableau de listes |
---|
81 | // |
---|
82 | |
---|
83 | |
---|
84 | // |
---|
85 | // lettres d'infos |
---|
86 | // |
---|
87 | |
---|
88 | |
---|
89 | echo spiplistes_afficher_en_liste(_T('spiplistes:listes_internes'), _DIR_PLUGIN_SPIPLISTES.'img_pack/stock_mail.gif', 'listes', 'inact', '', 'position') ; |
---|
90 | echo spiplistes_afficher_en_liste(_T('spiplistes:liste_diff_publiques'), _DIR_PLUGIN_SPIPLISTES.'img_pack/stock_mail.gif', 'listes', 'liste', '', 'position') ; |
---|
91 | echo spiplistes_afficher_en_liste(_T('spiplistes:listes_poubelle'), _DIR_PLUGIN_SPIPLISTES.'img_pack/stock_mail.gif', 'listes', 'poublist', '', 'position') ; |
---|
92 | |
---|
93 | |
---|
94 | // MODE EDIT LISTES FIN -------------------------------------------------------- |
---|
95 | |
---|
96 | echo "<p style='font-family: Arial, Verdana,sans-serif;font-size:10px;font-weight:bold'>".$GLOBALS['spiplistes_version']."<p>" ; |
---|
97 | echo fin_gauche(), fin_page(); |
---|
98 | } |
---|
99 | |
---|
100 | /******************************************************************************************/ |
---|
101 | /* SPIP-listes est un système de gestion de listes d'abonnés et d'envoi d'information */ |
---|
102 | /* par email pour SPIP. */ |
---|
103 | /* Copyright (C) 2004 Vincent CARON v.caron<at>laposte.net , http://bloog.net */ |
---|
104 | /* */ |
---|
105 | /* Ce programme est libre, vous pouvez le redistribuer et/ou le modifier selon les termes */ |
---|
106 | /* de la Licence Publique Générale GNU publiée par la Free Software Foundation */ |
---|
107 | /* (version 2). */ |
---|
108 | /* */ |
---|
109 | /* Ce programme est distribué car potentiellement utile, mais SANS AUCUNE GARANTIE, */ |
---|
110 | /* ni explicite ni implicite, y compris les garanties de commercialisation ou */ |
---|
111 | /* d'adaptation dans un but spécifique. Reportez-vous à la Licence Publique Générale GNU */ |
---|
112 | /* pour plus de détails. */ |
---|
113 | /* */ |
---|
114 | /* Vous devez avoir reçu une copie de la Licence Publique Générale GNU */ |
---|
115 | /* en même temps que ce programme ; si ce n'est pas le cas, écrivez à la */ |
---|
116 | /* Free Software Foundation, */ |
---|
117 | /* Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307, États-Unis. */ |
---|
118 | /******************************************************************************************/ |
---|
119 | ?> |
---|