From: Greg Burri <greg.burri@gmail.com>
Date: Wed, 8 Oct 2008 19:12:59 +0000 (+0000)
Subject: FIX #88
X-Git-Tag: 1.1.3~6
X-Git-Url: https://git.euphorik.ch/?a=commitdiff_plain;h=3c3e08ee08628398811d850f23d8494340ae8b2c;p=euphorik.git

FIX #88
---

diff --git a/modules/erl/euphorik_bd_admin.erl b/modules/erl/euphorik_bd_admin.erl
index 037de96..dca6c2d 100644
--- a/modules/erl/euphorik_bd_admin.erl
+++ b/modules/erl/euphorik_bd_admin.erl
@@ -289,8 +289,8 @@ patch(2) ->
       end,
       record_info(fields, minichat)
    ),
-   % comble les trous entre les id non-contigues
    mnesia:transaction(fun() ->
+      % comble les trous entre les id non-contigues
       lists:foreach(fun(Id) ->
             case mnesia:read({minichat, Id}) of
                [] -> 
@@ -300,7 +300,9 @@ patch(2) ->
             end
          end,
          lists:seq(1, mnesia:table_info(minichat, size))
-      )
+      ),
+      % la table troll utilise maintenant son index et pas celui de la table minichat (correction d'un vieux bug)
+      mnesia:write(#counter{key = troll, value = mnesia:table_info(minichat, size)})
    end),
    creer_indexes(). % uniquement pour l'indice sur id_minichat de la table troll