diff --git a/ChangeLog b/ChangeLog index 7bc84b0f8..9cc195209 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,8 @@ +2008-03-12 Badlop + + * src/web/ejabberd_web_admin.erl (term_to_string): Show Erlang + terms in one line in Erlang R12 (EJAB-503) + 2008-03-11 Badlop * src/ejabberd_s2s_in.erl (get_cert_domains): When compiling with diff --git a/src/web/ejabberd_web_admin.erl b/src/web/ejabberd_web_admin.erl index e2474920b..25ea9d237 100644 --- a/src/web/ejabberd_web_admin.erl +++ b/src/web/ejabberd_web_admin.erl @@ -1067,7 +1067,10 @@ acl_spec_select(ID, Opt) -> term_to_string(T) -> - lists:flatten(io_lib:format("~1000000p", [T])). + StringParagraph = lists:flatten(io_lib:format("~1000000p", [T])), + %% Remove from the string all the carriage returns characters + {ok, StringLine, _} = regexp:gsub(StringParagraph, "\\n ", ""), + StringLine. term_to_id(T) -> jlib:encode_base64(binary_to_list(term_to_binary(T))).