-module(euphorik_protocole).
-export([
- generation_captcha/1,
- nouveau_user_captcha/1,
+ %generation_captcha/1, Obsolète
+ %nouveau_user_captcha/1, Obsolète
nouveau_user_login/1,
login/1,
logout/1,
{erlang:list_to_integer(Id_racine_str, 36), erlang:list_to_integer(Page_conv_str)}
end,
xmerl_xpath:string("conversation", Action)
- ),
- Poulpe = euphorik_minichat_conversation:conversations(Conversations, Nb_message, Dernier_id, Page),
- io:format("Poulpe = ~p~n", [Poulpe]),\r
+ ),\r
% accrochez-vous ca va siouxer ;)
[{reponse, [{name, "refreshMessages"}],\r
lists:map(\r
)
]
}\r
- end,
- Poulpe\r
+ end,
+ euphorik_minichat_conversation:conversations(Conversations, Nb_message, Dernier_id, Page)\r
)
}];
_ ->
%%%%%%%%% <Réponses XML> %%%%%%%%%
simple_xml_to_string(XML) ->
- io:format("~p~n", [XML]),
lists:flatten(xmerl:export_simple(XML, xmerl_xml, [{prolog, ["<?xml version=\"1.0\" encoding=\"utf-8\" ?>\n"]}])).