X-Git-Url: http://git.euphorik.ch/?p=euphorik.git;a=blobdiff_plain;f=modules%2Ferl%2Feuphorik_protocole.erl;h=35742c98bf056bbb08e5d58c21774c5502e05be2;hp=ae79d849e55eba5297f3401c663a101c51b40cb4;hb=5219d8969b752fe675d7df0d527eeb37b0fcbea4;hpb=63d7601eeee2660728be1ff778dd7e6a04246ee5 diff --git a/modules/erl/euphorik_protocole.erl b/modules/erl/euphorik_protocole.erl index ae79d84..35742c9 100755 --- a/modules/erl/euphorik_protocole.erl +++ b/modules/erl/euphorik_protocole.erl @@ -250,7 +250,6 @@ wait_event_page_chat(User, Racines_conversations, Message_count, Last_message_id case euphorik_minichat_conversation:conversations(Racines_conversations, Message_count, Last_message_id, Main_page) of vide -> wait_event_bd_page_chat(), - % TODO : l'appel est-il bien tail-recursive ? wait_event_page_chat(User, Racines_conversations, Message_count, Last_message_id, Main_page, Troll_id); Conversations -> % accrochez-vous ca va siouxer ;) @@ -318,7 +317,7 @@ wait_event_bd_page_chat() -> % Après 60 minutes de connexion, le client doit donc reétablir une connexion after 1000 * 60 * 60 -> timeout - end. + end. % Attent un événement concernant la page admin @@ -392,7 +391,7 @@ put_message( if Strip_content =:= [] -> erreur("Message vide"); true -> - % TODO : non-atomique (update_pseudo+nouveau_message) + % attention : non-atomique (update_pseudo+nouveau_message) euphorik_bd:update_pseudo_user(User#user.id, Nick), case euphorik_bd:nouveau_message(Strip_content, User#user.id, Answer_to) of {erreur, R} -> erreur("Impossible d'ajouter un nouveau message. Raison : " ++ R);