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
), \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
_ ->\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