projects
/
euphorik.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
(no commit message)
[euphorik.git]
/
modules
/
erl
/
euphorik_protocole.erl
diff --git
a/modules/erl/euphorik_protocole.erl
b/modules/erl/euphorik_protocole.erl
index
2f4a5a3
..
57275fc
100755
(executable)
--- a/
modules/erl/euphorik_protocole.erl
+++ b/
modules/erl/euphorik_protocole.erl
@@
-8,8
+8,8
@@
-module(euphorik_protocole).
-export([
-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,
nouveau_user_login/1,
login/1,
logout/1,
@@
-159,9
+159,7
@@
refreshMessage(Action) ->
{erlang:list_to_integer(Id_racine_str, 36), erlang:list_to_integer(Page_conv_str)}
end,
xmerl_xpath:string("conversation", Action)
{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
% accrochez-vous ca va siouxer ;)
[{reponse, [{name, "refreshMessages"}],
\r
lists:map(
\r
@@
-198,8
+196,8
@@
refreshMessage(Action) ->
)
]
}
\r
)
]
}
\r
- end,
- Poulpe
\r
+ end,
+ euphorik_minichat_conversation:conversations(Conversations, Nb_message, Dernier_id, Page)
\r
)
}];
_ ->
)
}];
_ ->
@@
-281,7
+279,6
@@
format_date(Date) ->
%%%%%%%%% <Réponses XML> %%%%%%%%%
simple_xml_to_string(XML) ->
%%%%%%%%% <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"]}])).
lists:flatten(xmerl:export_simple(XML, xmerl_xml, [{prolog, ["<?xml version=\"1.0\" encoding=\"utf-8\" ?>\n"]}])).