FIX #88

[euphorik.git] / modules / erl / euphorik_bd_admin.erl

diff --git a/modules/erl/euphorik_bd_admin.erl b/modules/erl/euphorik_bd_admin.erl
index 037de96..dca6c2d 100644 (file)
--- a/modules/erl/euphorik_bd_admin.erl
+++ b/modules/erl/euphorik_bd_admin.erl
@@ -289,8 +289,8 @@ patch(2) ->
       end,\r
       record_info(fields, minichat)\r
    ),
-   % 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),\r
    creer_indexes(). % uniquement pour l'indice sur id_minichat de la table troll\r