From: x2003bruneau <x2003bruneau@839d8a87-29fc-0310-9880-83ba4fa771e5>
Date: Mon, 30 Apr 2007 09:02:16 +0000 (+0000)
Subject: Import 1769
X-Git-Tag: xorg/0.9.14~32
X-Git-Url: http://git.polytechnique.org/?a=commitdiff_plain;h=e6f4b2ab999de336b6c48ef1e05b019cacefe3b1;p=platal.git

Import 1769


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

diff --git a/include/banana/ml.inc.php b/include/banana/ml.inc.php
index 6eb7b0c..60d2fee 100644
--- a/include/banana/ml.inc.php
+++ b/include/banana/ml.inc.php
@@ -85,13 +85,13 @@ class BananaMLArchive extends BananaMBox
     {
         global $globals;
         $spool = $globals->lists->spool . '/';
-        $list = glob($spool . '*.mbox', GLOB_ONLYDIR);
+        $list = glob($spool . '*.mbox/*.mbox');
         if ($list === false) {
             return array();
         }
         $groups = array();
         foreach ($list as $path) {
-            $path = substr($path, strlen($spool));
+            $path = substr($path, strpos($path, 'mbox/') + 5);
             $path = substr($path, 0, -5);
             list($domain, $listname) = explode($globals->lists->vhost_sep, $path, 2);
             $group = $listname . '@' . $domain;