25
1
mirror of https://github.com/processone/ejabberd.git synced 2024-11-30 16:36:29 +01:00

Improve parsing of ejabberd_sm:get_user_info result.

SVN Revision: 2857
This commit is contained in:
Badlop 2010-01-04 18:59:01 +00:00
parent f30783a2d2
commit 05ee83bddc

View File

@ -1670,7 +1670,10 @@ user_info(User, Server, Query, Lang) ->
User, Server, R) of User, Server, R) of
offline -> offline ->
""; "";
[{node, Node}, {conn, Conn}, {ip, {IP, Port}}] -> Info when is_list(Info) ->
Node = proplists:get_value(node, Info),
Conn = proplists:get_value(conn, Info),
{IP, Port} = proplists:get_value(ip, Info),
ConnS = case Conn of ConnS = case Conn of
c2s -> "plain"; c2s -> "plain";
c2s_tls -> "tls"; c2s_tls -> "tls";