source: spip-zone/_plugins_/abomailmans/exec/abomailmans_tous.php @ 53135

Last change on this file since 53135 was 53135, checked in by kent1@…, 8 years ago

if (!defined('_ECRIRE_INC_VERSION')) return; partout

  • Property svn:eol-style set to native
  • Property svn:executable set to *
  • Property svn:keywords set to Date Author Id Revision HeadURL
  • Property svn:mime-type set to text/plain
File size: 1.5 KB
Line 
1<?php
2
3/*
4 * Abomailmans
5 * MaZiaR - NetAktiv
6 * tech@netaktiv.com
7 * Printemps 2007 - 2009
8 * $Id: abomailmans_tous.php 53135 2011-10-09 22:38:30Z kent1@arscenic.info $
9*/
10
11if (!defined("_ECRIRE_INC_VERSION")) return;
12
13include_spip('inc/abomailmans');
14
15function exec_abomailmans_tous(){
16        include_spip("inc/presentation");
17        global $couleur_claire;
18       
19        $commencer_page = charger_fonction('commencer_page', 'inc');
20        echo $commencer_page(_T("abomailmans:les_listes_mailmans"), "documents", "abomailmans", "");
21                if(!autoriser($id_abomailman?'modifier' : 'creer', 'abomailmans', $id_abomailman)) {
22                include_spip('inc/minipres');
23                echo minipres();
24        } else {
25               
26        echo debut_gauche("",true);
27        echo debut_boite_info(true);
28        echo _T("abomailmans:les_listes_mailmans");
29        echo fin_boite_info(true);
30       
31         
32        $result = sql_count(sql_select("id_abomailman","spip_abomailmans"));
33        if ($result>0) {
34                echo debut_boite_info(true);
35                        echo icone_horizontale(_T("abomailmans:icone_envoyer_mail_liste"), generer_url_ecrire("abomailmans_envoyer",""),find_in_path("img_pack/forward.png"), "",false);
36                echo fin_boite_info(true);
37        }
38        echo debut_droite("",true);
39       
40        // L'icone de creation de liste
41        $link=generer_url_ecrire('abomailmans_edit', 'new=oui');
42        $link=parametre_url($link,'retour',str_replace('&amp;', '&', self()));
43        $icone = icone(_T("abomailmans:icone_ajouter_liste"), $link, _DIR_PLUGIN_ABOMAILMANS. "/img_pack/mailman.gif", "creer.gif");
44       
45        echo recuperer_fond('prive/abomailman_afficher_abomailmans',array("couleur_claire"=>$couleur_claire,'icone' => $icone));
46        }
47       
48        echo fin_gauche(), fin_page();
49}
50
51?>
Note: See TracBrowser for help on using the repository browser.