diff options
| -rw-r--r-- | src/ejabberd_xmlrpc.erl | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/ejabberd_xmlrpc.erl b/src/ejabberd_xmlrpc.erl index 6e67dc4c4..9b4b119b6 100644 --- a/src/ejabberd_xmlrpc.erl +++ b/src/ejabberd_xmlrpc.erl @@ -342,8 +342,12 @@ process_unicode_codepoints(Str) -> %% Result %% ----------------------------- +format_result({error, Error}, _) when is_list(Error) -> + throw({error, lists:flatten(Error)}); format_result({error, Error}, _) -> throw({error, Error}); +format_result({error, _Type, _Code, Error}, _) when is_list(Error) -> + throw({error, lists:flatten(Error)}); format_result({error, _Type, _Code, Error}, _) -> throw({error, Error}); format_result(String, string) -> lists:flatten(String); |