X-Git-Url: http://git.polytechnique.org/?a=blobdiff_plain;f=include%2Fbanana%2Fml.inc.php;h=c2eea5c74f82c52a967b19db713aed9750c219ee;hb=0b37833b3b42f608fa0d5864f9d4b2518d9676ae;hp=1a5413f4e94946cf3044878e2f0a002466714cda;hpb=ebd515f95f03f8a87f9b846d65e179b39a535222;p=platal.git

diff --git a/include/banana/ml.inc.php b/include/banana/ml.inc.php
index 1a5413f..c2eea5c 100644
--- a/include/banana/ml.inc.php
+++ b/include/banana/ml.inc.php
@@ -79,6 +79,17 @@ class MLBanana extends Banana
         $sig  = $nom . ' (' . S::v('promo') . ')';
         Banana::$msgedit_headers['X-Org-Mail'] = S::v('forlife') . '@' . $globals->mail->domain;
 
+        // Tree color
+        $req = XDB::query("SELECT  tree_unread, tree_read
+                             FROM  {$globals->banana->table_prefix}profils
+                            WHERE  uid={?}", S::i('uid'));
+        if (!(list($unread, $read) = $req->fetchOneRow())) {
+            $unread = 'o';
+            $read = 'dg';
+        }
+        Banana::$tree_unread = $unread;
+        Banana::$tree_read = $read;
+
         // Build user profile
         Banana::$profile['headers']['From']         = "$nom <$mail>";
         Banana::$profile['headers']['Organization'] = make_Organization();