4 * FusionForge Mailing Lists Facility
6 * Portions Copyright 1999-2001 (c) VA Linux Systems
7 * The rest Copyright 2003-2004 (c) Guillaume Smet - Open Wide
11 * Portions Copyright 2010 (c) Mélanie Le Bail
13 require_once 'env.inc.php';
14 require_once 'pre.php';
15 require_once 'preplugins.php';
16 require_once 'plugins_utils.php';
17 require_once '../mailman_utils.php';
19 $request =& HTTPRequest::instance();
20 $group_id = $request->get('group_id');
27 $pm = ProjectManager::instance();
28 $Group = $pm->getProject($group_id);
29 if (!$Group || !is_object($Group) || $Group->isError()) {
33 if (!$current_user->isMember($group_id,'A')) {
34 exit_permission_denied();
39 $ml = new MailmanList($group_id,$request->get('id'));
41 if ($request->exist('submit')) {
42 $sure = $request->get('sure');
43 $really_sure = $request->get('really_sure');
44 if (!$ml->deleteList($sure,$really_sure)) {
45 exit_error('Error',$ml->getErrorMessage());
47 htmlRedirect('/plugins/mailman/index.php?group_id='.$group_id.'&feedback=DELETED');
52 'title' => _('Permanently Delete List')
56 <h3><?php echo $ml->getName(); ?></h3>
58 <form method="post" action="<?php echo $request->get('PHP_SELF'); ?>?group_id=<?php echo $group_id; ?>&id=<?php echo $ml->getID(); ?>">
59 <input type="checkbox" name="sure" value="1"><?php echo _('Confirm Delete'); ?><br />
60 <input type="checkbox" name="really_sure" value="1"><?php echo _('Confirm Delete'); ?><br />
61 <input type="submit" name="submit" value="<?php echo _('Permanently Delete'); ?>">