MOD cleanage de code

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

diff --git a/modules/erl/euphorik_bd.erl b/modules/erl/euphorik_bd.erl
index 0bda09f..cad8183 100755 (executable)
--- a/modules/erl/euphorik_bd.erl
+++ b/modules/erl/euphorik_bd.erl
@@ -39,7 +39,7 @@
    css_from_user_cookie/1,\r
    is_ek_master_from_cookie/1,\r
    \r
-   % messages :e\r
+   % messages :\r
    nouveau_message/3,\r
    nouveau_message_sys/1,\r
    nouveau_message_sys/2,\r
@@ -179,7 +179,7 @@ update_pseudo_user(UserId, Pseudo) ->
 user_by_cookie(Cookie) ->\r
    resultat_transaction(mnesia:transaction(\r
       fun() ->\r
-         case e(q([E || E <- mnesia:table(user), E#user.cookie =:= Cookie]), [{tmpdir, ?KEY_SORT_TEMP_DIR}]) of\r
+         case mnesia:index_read(user, Cookie, #user.cookie) of\r
             [User] -> {ok, User};\r
             _ -> erreur\r
          end\r
@@ -265,7 +265,7 @@ nouveau_message(Mess, Auteur_id, Repond_A_ids) ->
       ), \r
       Racine_id = case Repond_a of\r
          [] -> undefined;\r
-         [M | _ ] -> \r
+         [M | _] -> \r
             Une_racine = M#minichat.racine_id,\r
             % vérification que tout les messages de Repond_a possède la même racine (même conversation)\r
             case lists:all(fun(R) -> R#minichat.racine_id =:= Une_racine end, Repond_a) of\r
@@ -274,7 +274,7 @@ nouveau_message(Mess, Auteur_id, Repond_A_ids) ->
                _ ->\r
                   {erreur, "Les messages ne font pas partie de la même conversation"}\r
             end\r
-      end,      \r
+      end,\r
       case Racine_id of\r
          {erreur, E} -> {erreur, E};\r
          _ ->\r
@@ -476,15 +476,6 @@ parents_id(M_id) ->
 % ordrés du plus petit au plus grand.\r
 % @spec enfants_id(integer()) -> [integer()]\r
 enfants_id(M_id) ->\r
-%   resultat_transaction(mnesia:transaction(fun() ->\r
-%      e(\r
-%         qlc:sort(\r
-%            q([E#reponse_minichat.repondant || E <- mnesia:table(reponse_minichat), E#reponse_minichat.cible =:= M]),\r
-%            [{order, ascending}]\r
-%         ),\r
-%         [{tmpdir, ?KEY_SORT_TEMP_DIR}]\r
-%      )\r
-%   end)).\r
    resultat_transaction(mnesia:transaction(fun() ->\r
       case mnesia:index_read(reponse_minichat, M_id, #reponse_minichat.cible) of\r
          Enfants when is_list(Enfants) ->\r