|
@@ -133,14 +133,14 @@ add_clientid(_Bindings, Params) ->
|
|
|
end.
|
|
end.
|
|
|
|
|
|
|
|
do_add_clientid([ Params | ParamsN ], ReList ) ->
|
|
do_add_clientid([ Params | ParamsN ], ReList ) ->
|
|
|
- Clientid = urldecode(get_value(<<"clientid">>, Params)),
|
|
|
|
|
|
|
+ Clientid = get_value(<<"clientid">>, Params),
|
|
|
do_add_clientid(ParamsN, [{Clientid, format_msg(do_add_clientid(Params))} | ReList]);
|
|
do_add_clientid(ParamsN, [{Clientid, format_msg(do_add_clientid(Params))} | ReList]);
|
|
|
|
|
|
|
|
do_add_clientid([], ReList) ->
|
|
do_add_clientid([], ReList) ->
|
|
|
{ok, ReList}.
|
|
{ok, ReList}.
|
|
|
|
|
|
|
|
do_add_clientid(Params) ->
|
|
do_add_clientid(Params) ->
|
|
|
- Clientid = urldecode(get_value(<<"clientid">>, Params)),
|
|
|
|
|
|
|
+ Clientid = get_value(<<"clientid">>, Params),
|
|
|
Password = get_value(<<"password">>, Params),
|
|
Password = get_value(<<"password">>, Params),
|
|
|
Login = {clientid, Clientid},
|
|
Login = {clientid, Clientid},
|
|
|
case validate([login, password], [Login, Password]) of
|
|
case validate([login, password], [Login, Password]) of
|
|
@@ -182,14 +182,14 @@ add_username(_Bindings, Params) ->
|
|
|
end.
|
|
end.
|
|
|
|
|
|
|
|
do_add_username([ Params | ParamsN ], ReList ) ->
|
|
do_add_username([ Params | ParamsN ], ReList ) ->
|
|
|
- Username = urldecode(get_value(<<"username">>, Params)),
|
|
|
|
|
|
|
+ Username = get_value(<<"username">>, Params),
|
|
|
do_add_username(ParamsN, [{Username, format_msg(do_add_username(Params))} | ReList]);
|
|
do_add_username(ParamsN, [{Username, format_msg(do_add_username(Params))} | ReList]);
|
|
|
|
|
|
|
|
do_add_username([], ReList) ->
|
|
do_add_username([], ReList) ->
|
|
|
{ok, ReList}.
|
|
{ok, ReList}.
|
|
|
|
|
|
|
|
do_add_username(Params) ->
|
|
do_add_username(Params) ->
|
|
|
- Username = urldecode(get_value(<<"username">>, Params)),
|
|
|
|
|
|
|
+ Username = get_value(<<"username">>, Params),
|
|
|
Password = get_value(<<"password">>, Params),
|
|
Password = get_value(<<"password">>, Params),
|
|
|
Login = {username, Username},
|
|
Login = {username, Username},
|
|
|
case validate([login, password], [Login, Password]) of
|
|
case validate([login, password], [Login, Password]) of
|