From: Greg Burri Date: Fri, 17 Oct 2008 08:02:50 +0000 (+0000) Subject: FIX #92 X-Git-Tag: 1.1.5~1 X-Git-Url: https://git.euphorik.ch/?a=commitdiff_plain;h=dcc7f52d5ea1a6c0e541cfc03ad0723b8c0767a8;p=euphorik.git FIX #92 --- diff --git a/modules/erl/euphorik_protocole.erl b/modules/erl/euphorik_protocole.erl index 3706f68..a61d0c8 100755 --- a/modules/erl/euphorik_protocole.erl +++ b/modules/erl/euphorik_protocole.erl @@ -308,7 +308,7 @@ wait_event_page_chat(User, Racines_conversations, Message_count, Last_message_id {Racine_id, _, _} = Racine, case euphorik_bd:message_by_id(Racine_id) of {ok, Mess} -> - json_message(Mess, euphorik_bd:parents(Racine_id), User); + json_message(Mess, euphorik_bd:parents_id(Racine_id), User); _ -> null end @@ -754,7 +754,7 @@ json_message(Mess, Repond_a, User) -> {content, Mess#minichat.contenu}, {root, Mess#minichat.racine_id}, {answer_to, {array, lists:map( - fun(Id_mess) -> + fun(Id_mess) -> {ok, M} = euphorik_bd:message_by_id(Id_mess), {ok, User_reponse} = euphorik_bd:user_by_mess(M#minichat.id), {struct, [{id, M#minichat.id}, {nick, M#minichat.pseudo}, {login, User_reponse#user.login}]}