Backports

[platal.git] / include / banana / ml.inc.php

diff --git a/include/banana/ml.inc.php b/include/banana/ml.inc.php
index 97e43aa..04ffce5 100644 (file)
--- a/include/banana/ml.inc.php
+++ b/include/banana/ml.inc.php
@@ -26,7 +26,11 @@ function hook_makeLink($params)
 {
     global $globals, $platal;
     $base = $globals->baseurl . '/' . $platal->ns . 'lists/archives/' . MLBanana::$listname;
-    return $base . hook_platalMessageLink($params);
+    $base = $base . hook_platalMessageLink($params);
+    if (@$params['action'] == 'showext') {
+        $base .= '?action=showext';
+    }
+    return $base;
 }
 
 class MLBanana extends Banana
@@ -36,10 +40,15 @@ class MLBanana extends Banana
 
     function __construct($params = null)
     {
+               global $globals;
+        Banana::$spool_root = $globals->banana->spool_root;
         Banana::$spool_boxlist = false;
         Banana::$msgedit_canattach = true;
+        if (S::has_perms()) {
+            Banana::$msgshow_mimeparts[] = 'source';
+        }    
         array_push(Banana::$msgparse_headers, 'x-org-id', 'x-org-mail');
-         
+
         MLBanana::$listname = $params['listname'];
         MLBanana::$domain   = $params['domain'];
         $params['group'] = $params['listname'] . '@' . $params['domain'];