diff options
| author | Badlop <badlop@process-one.net> | 2010-01-04 18:59:01 +0000 |
|---|---|---|
| committer | Badlop <badlop@process-one.net> | 2010-01-04 18:59:01 +0000 |
| commit | 05ee83bddca58a5fb9451132d6c04753418858df (patch) | |
| tree | db0babe9ba8bb4dc14f43716a30817bb405608c1 /src | |
| parent | add explicit comment on last published items configuration (EJAB-1130) (diff) | |
Improve parsing of ejabberd_sm:get_user_info result.
SVN Revision: 2857
Diffstat (limited to 'src')
| -rw-r--r-- | src/web/ejabberd_web_admin.erl | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/src/web/ejabberd_web_admin.erl b/src/web/ejabberd_web_admin.erl index 0a66b1576..06890f142 100644 --- a/src/web/ejabberd_web_admin.erl +++ b/src/web/ejabberd_web_admin.erl @@ -1670,7 +1670,10 @@ user_info(User, Server, Query, Lang) -> User, Server, R) of 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 c2s -> "plain"; c2s_tls -> "tls"; |