From 71ce4d77699be5743be4e4b0d448f4f7a5d6c402 Mon Sep 17 00:00:00 2001
From: x2000habouzit <x2000habouzit@839d8a87-29fc-0310-9880-83ba4fa771e5>
Date: Sat, 25 Mar 2006 17:09:03 +0000
Subject: [PATCH] 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
---
 htdocs/listes/delete.php | 5 +++++
 1 file changed, 5 insertions(+)

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);
-- 
2.1.4