From: x2000habouzit <x2000habouzit@839d8a87-29fc-0310-9880-83ba4fa771e5>
Date: Sat, 25 Mar 2006 17:09:03 +0000 (+0000)
Subject: fix bug with deletion of lists: DB was not purged
X-Git-Tag: xorg/0.9.10~93
X-Git-Url: http://git.polytechnique.org/?a=commitdiff_plain;h=71ce4d77699be5743be4e4b0d448f4f7a5d6c402;p=platal.git

fix bug with deletion of lists: DB was not purged



git-svn-id: svn+ssh://murphy/home/svn/platal/trunk@271 839d8a87-29fc-0310-9880-83ba4fa771e5
---

diff --git a/htdocs/listes/delete.php b/htdocs/listes/delete.php
index 1f49536..ce36f1c 100644
--- a/htdocs/listes/delete.php
+++ b/htdocs/listes/delete.php
@@ -31,6 +31,11 @@ if (!$page) {
 }
 
 if ( Post::get('valid') == 'OUI' && $client->delete_list($liste, Post::getBool('del_archive')) ) {
+    foreach (array('', '-owner', '-admin', '-bounces') as $app) {
+        $globals->xdb->execute("DELETE FROM  aliases
+                                      WHERE  type='liste' AND alias='{?}'",
+                               $ml.$app)
+    }
     $page->assign('deleted', true);
 } elseif (list($details,$options) = $client->get_owner_options($liste)) {
     $page->assign_by_ref('details', $details);