source: alternc-mailman/trunk/bureau/admin/mman_dodel.php @ 1810

Revision 1810, 1.7 KB checked in by franck, 8 years ago (diff)

Ajout d'une confirmation lors de la suppression de listes mailman

Line 
1<?php
2/*
3 $Id: mman_dodel.php 2 2003-06-13 20:30:40Z root $
4 ----------------------------------------------------------------------
5 AlternC - Web Hosting System
6 Copyright (C) 2002 by the AlternC Development Team.
7 http://alternc.org/
8 ----------------------------------------------------------------------
9 Based on:
10 Valentin Lacambre's web hosting softwares: http://altern.org/
11 ----------------------------------------------------------------------
12 LICENSE
13
14 This program is free software; you can redistribute it and/or
15 modify it under the terms of the GNU General Public License (GPL)
16 as published by the Free Software Foundation; either version 2
17 of the License, or (at your option) any later version.
18
19 This program is distributed in the hope that it will be useful,
20 but WITHOUT ANY WARRANTY; without even the implied warranty of
21 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
22 GNU General Public License for more details.
23
24 To read the license please visit http://www.gnu.org/copyleft/gpl.html
25 ----------------------------------------------------------------------
26 Original Author of file: Benjamin Sonntag
27 Purpose of file: Delete mailing-lists
28 ----------------------------------------------------------------------
29*/
30require_once("../class/config.php");
31
32$stchange = (!$quota->cancreate("mailman"));
33
34if ($cancel)
35{
36        include ("mman_list.php");
37        exit();
38}
39
40if (!is_array($d))
41{
42        $tmp = array($d);
43        $d = $tmp;
44}
45reset($d);
46
47if ($confirm)
48{
49        foreach ($d as $id)
50        {
51                $r = $mailman->delete_lst($id);
52                if (!$r)
53                {
54                        $error .= $err->errstr() . "<br />";
55                }
56                else
57                {
58                        $error .= sprintf(_("The list %s has been successfully deleted."), $r) . "<br />";
59                }
60        }
61}
62
63include ("mman_list.php");
64exit();
65
66?>
Note: See TracBrowser for help on using the repository browser.