X-Git-Url: http://git.euphorik.ch/?p=euphorik.git;a=blobdiff_plain;f=modules%2Ferl%2Feuphorik_bd.erl;fp=modules%2Ferl%2Feuphorik_bd.erl;h=e114b52e16f8c478d20e93670d1fde8d0cfededb;hp=9ad6da2caf10c0736d404b2941458601455fc90e;hb=d46b9cc6453803962960373f4adff4e3b89b5b4d;hpb=2233e8f8760b118c3cacf541ef32ea456a8e1527

diff --git a/modules/erl/euphorik_bd.erl b/modules/erl/euphorik_bd.erl
index 9ad6da2..e114b52 100755
--- a/modules/erl/euphorik_bd.erl
+++ b/modules/erl/euphorik_bd.erl
@@ -4,7 +4,7 @@
 % Ce module utilise une base mnesia.
 % @author G.Burri
 
--module(euphorik_minichat).
+-module(euphorik_bd).
 -export([
    % gestion :
    create/0,
@@ -364,7 +364,6 @@ messages_by_ids(Ids) ->
       fun() ->
          % TODO : optimisations ? serait-ce du O(n) ?
          Query = qlc:q([E || E <- qlc:keysort(2, mnesia:table(minichat), [{order, ascending}]), lists:any(fun(Id) -> Id =:= E#minichat.id end, Ids)]),
-         %io:format("~s~n", [qlc:info(Query)]),
          qlc:e(Query)
       end
    )).
@@ -479,6 +478,7 @@ delta_date_ms(D1, D2) ->
 
 
 % Bizarre, cette fonction n'existe pas dans la stdlib.
+% Pas utilisé mais bon ca me fait de la peine de l'enlever.
 ceiling(X) ->
    T = trunc(X),
    case (X - T) of