From be3ad3cfcbe4697894da49a357935479c5bab0ee Mon Sep 17 00:00:00 2001
From: "Pierre Habouzit (MadCoder" <pierre.habouzit@m4x.org>
Date: Sun, 20 Feb 2005 14:27:50 +0000
Subject: [PATCH] backport, the real one

Patches applied:

 * opensource@polytechnique.org--2005/platal--release--0.9.4--patch-38
   owner should be able to delete their list


git-archimport-id: opensource@polytechnique.org--2005/platal--mainline--0.9--patch-487
---
 bin/lists.rpc.py | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/bin/lists.rpc.py b/bin/lists.rpc.py
index e2cec46..328005d 100755
--- a/bin/lists.rpc.py
+++ b/bin/lists.rpc.py
@@ -835,7 +835,8 @@ def delete_list(userdesc,perms,vhost,listname,del_archives=0):
     except:
         return 0
     try:
-        if perms != 'admin': return 0
+        if not is_admin_on(userdesc, perms, mlist):
+            return 0
         # remove the list
         REMOVABLES = [ os.path.join('lists', lname), ]
         # remove stalled locks
-- 
2.1.4