- end,
- % extraction des conversations en [{id, page}, ..]
- % Obsolète : obtenu depuis la table 'user'
- %~ Conversations = lists:map(
- %~ fun(Conv) ->
- %~ [#xmlElement{content = [#xmlText{value = Id_racine_str}]}] = xmerl_xpath:string("racine", Conv),
- %~ [#xmlElement{content = [#xmlText{value = Page_conv_str}]}] = xmerl_xpath:string("page", Conv),
- %~ {erlang:list_to_integer(Id_racine_str, 36), erlang:list_to_integer(Page_conv_str)}
- %~ end,
- %~ xmerl_xpath:string("conversation", Action)
- %~ ),\r