generer_cookie() ->\r
{A1, A2, A3} = now(),\r
random:seed(A1, A2, A3),\r
- erlang:integer_to_list(random:uniform(math:pow(10, 32)), 36).\r
+ erlang:integer_to_list(random:uniform(trunc(math:pow(10, 32))), 36).\r
\r
\r
% Modification du profile.\r
{struct, [\r
{reply, "new_troll"},\r
{troll_id, Current#troll.id},\r
- {message_id, euphorik_bd:message_id_associe(Current#troll.id)},\r
+ {message_id, Current#troll.id_minichat},\r
{content, Current#troll.content}\r
]};\r
_ ->\r
{Racine_id, _, _} = Racine,\r
case euphorik_bd:message_by_id(Racine_id) of\r
{ok, Mess} ->\r
- json_message(Mess, euphorik_bd:parents(Racine), User);\r
+ json_message(Mess, euphorik_bd:parents_id(Racine_id), User);\r
_ ->\r
null\r
end\r
{ok, User} ->\r
case euphorik_bd:est_banni(User#user.id) of\r
{true, Temps_restant} ->\r
- erreur(80, format_minutes(Temps_restant));\r
+ erreur(80, [format_minutes(Temps_restant)]);\r
_ ->\r
Strip_content = string:strip(Content),\r
if Strip_content =:= [] ->\r
% attention : non-atomique (update_pseudo+nouveau_message)\r
euphorik_bd:update_pseudo_user(User#user.id, Nick),\r
case euphorik_bd:nouveau_message(Strip_content, User#user.id, Answer_to) of\r
- {erreur, R} -> erreur(100, R);\r
+ {erreur, R} -> erreur(100, [R]);\r
_ ->\r
json_reponse_ok()\r
end\r
erreur(120);\r
{ok, #user{ek_master = false, profile = Profile2} = User2} ->\r
euphorik_bd:ban(User2#user.last_ip, Duration),\r
- euphorik_bd:nouveau_message_sys(lists:flatten(io_lib:format("''~s~s'' est ~s pour ~s.~s",\r
+ euphorik_bd:nouveau_message_sys(lists:flatten(io_lib:format("\"~s~s\" est ~s pour ~s.~s",\r
[\r
Profile2#profile.pseudo,\r
if User2#user.login =:= [] -> ""; true -> " (" ++ User2#user.login ++ ")" end,\r
{ok, User = #user{ek_master = true}} ->\r
case euphorik_bd:put_troll(User#user.id, Content) of\r
max_troll_reached_per_user ->\r
- erreur(180, ?NB_MAX_TROLL_WAITING_BY_USER);\r
+ erreur(180, [?NB_MAX_TROLL_WAITING_BY_USER]);\r
max_troll_reached ->\r
- erreur(190, ?NB_MAX_TROLL_WAITING);\r
+ erreur(190, [?NB_MAX_TROLL_WAITING]);\r
_Id ->\r
json_reponse_ok()\r
end;\r
{struct, [\r
{id, Mess#minichat.id},\r
{user_id, User_mess#user.id},\r
- {date, format_date(Mess#minichat.date)},\r
+ {date, case Mess#minichat.date of undefined -> "?"; _ -> format_date(Mess#minichat.date) end},\r
{system, Mess#minichat.auteur_id =:= 0},\r
{owner, Est_proprietaire},\r
{answered, A_repondu_a_message},\r
{content, Mess#minichat.contenu},\r
{root, Mess#minichat.racine_id},\r
{answer_to, {array, lists:map(\r
- fun(Id_mess) -> \r
+ fun(Id_mess) -> \r
{ok, M} = euphorik_bd:message_by_id(Id_mess),\r
{ok, User_reponse} = euphorik_bd:user_by_mess(M#minichat.id),\r
{struct, [{id, M#minichat.id}, {nick, M#minichat.pseudo}, {login, User_reponse#user.login}]}\r