X-Git-Url: http://git.euphorik.ch/?a=blobdiff_plain;f=modules%2Ferl%2Feuphorik_requests.erl;h=5b3a6d2a01b5438d62e63012cf0f26a0672d7e2f;hb=897468be6fa01ab87f38189f2daf266f3289c9fb;hp=a289f0dcaae40b792a536c36515946d809210e90;hpb=6feaef2a51f7226c41d69f9e86f605718b78aa02;p=euphorik.git
diff --git a/modules/erl/euphorik_requests.erl b/modules/erl/euphorik_requests.erl
index a289f0d..5b3a6d2 100755
--- a/modules/erl/euphorik_requests.erl
+++ b/modules/erl/euphorik_requests.erl
@@ -21,18 +21,19 @@ tester() ->
%~ ""),
%~ io:format("Nouvel user : ~p~n", [nouveau_user(XML)]).
- {XML2, _} = xmerl_scan:string(
- ""
- " 5DZQ2HCRO7JIX3QCSWRNL"
- ""),
- io:format("Login : ~p~n", [euphorik_protocole:login(XML2)]).
-
- %~ {XML, _} = xmerl_scan:string(
- %~ ""
- %~ "5"
- %~ "1"
+ %~ {XML2, _} = xmerl_scan:string(
+ %~ ""
+ %~ " 5DZQ2HCRO7JIX3QCSWRNL"
%~ ""),
- %~ io:format("Messages de la premières page : ~p~n", [euphorik_protocole:refreshMessage(XML)]).
+ %~ io:format("Login : ~p~n", [euphorik_protocole:login(XML2)]).
+
+ XML =
+ ""
+ "2"
+ "1"
+ "31"
+ "",
+ io:format("Messages de la premières page : ~p~n", [traiter_xml(XML)]).
%~ traiter_xml(""
%~ "4UDUSY6Z2IZNTQO484S8X"
@@ -42,6 +43,7 @@ tester() ->
%~ traiter_xml(
%~ ""
%~ "").
+
% il faut catcher toutes les exceptions possibles
out(A) ->