From f6d7d05348a0bb510323fa216ff5c6d9e931a7a4 Mon Sep 17 00:00:00 2001 From: gspasov Date: Wed, 27 Mar 2019 15:25:38 +0200 Subject: [PATCH] Fix parsing of request data --- apps/roster/src/rest/rest_chat_csv.erl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/apps/roster/src/rest/rest_chat_csv.erl b/apps/roster/src/rest/rest_chat_csv.erl index 4109eb021..5bcdcdd42 100644 --- a/apps/roster/src/rest/rest_chat_csv.erl +++ b/apps/roster/src/rest/rest_chat_csv.erl @@ -90,8 +90,8 @@ send_response(CsvText, Filename, Req) -> Req:respond({ResponseStatus, ResponseHeader, ResponseData}). -spec parse_incomming_data(list(tuple())) -> {ok, term()} | {error, wrong_data}. -parse_incomming_data([{"from", FromPhoneId}, {"to", ToPhoneId}]) -> {ok, {list_to_binary(FromPhoneId), list_to_binary(ToPhoneId)}}; -parse_incomming_data([{"muc", RoomId}]) -> {ok, list_to_binary(RoomId)}; +parse_incomming_data([{<<"from">>, FromPhoneId}, {<<"to">>, ToPhoneId}]) -> {ok, {FromPhoneId, ToPhoneId}}; +parse_incomming_data([{<<"muc">>, RoomId}]) -> {ok, RoomId}; parse_incomming_data(_) -> {error, wrong_data}. -spec conversation_to_csv(ChatHistory::type_chat_history(), Members::list(type_user_data()), CsvColumnsData::string()) -> string(). -- GitLab