diff options
| author | Badlop <badlop@process-one.net> | 2015-04-03 12:16:11 +0200 |
|---|---|---|
| committer | Badlop <badlop@process-one.net> | 2015-04-03 12:16:11 +0200 |
| commit | 94761ff31e73a1f326cecbca981820a8350042a6 (patch) | |
| tree | 4ebb304f341b028f8fb20c45340e2f90dc347316 | |
| parent | Fix output formatting in srg_get_info commend from mod_admin_extra (diff) | |
Improve srg_get_info result format (processone/ejabberd-contrib#92)
| -rw-r--r-- | src/mod_admin_extra.erl | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/src/mod_admin_extra.erl b/src/mod_admin_extra.erl index 972202996..043b6f3c1 100644 --- a/src/mod_admin_extra.erl +++ b/src/mod_admin_extra.erl @@ -1302,7 +1302,7 @@ private_set2(Username, Host, Xml) -> srg_create(Group, Host, Name, Description, Display) -> DisplayList = case Display of - [] -> []; + <<>> -> []; _ -> ejabberd_regexp:split(Display, <<"\\\\n">>) end, Opts = [{name, Name}, @@ -1323,7 +1323,12 @@ srg_get_info(Group, Host) -> Os when is_list(Os) -> Os; error -> [] end, - [{jlib:atom_to_binary(Title), Value} || {Title, Value} <- Opts]. + [{jlib:atom_to_binary(Title), + io_lib:format("~p", [btl(Value)])} || {Title, Value} <- Opts]. + +btl([]) -> []; +btl([B|L]) -> [btl(B)|btl(L)]; +btl(B) -> binary_to_list(B). srg_get_members(Group, Host) -> Members = mod_shared_roster:get_group_explicit_users(Host,Group), |