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