25
1
mirror of https://github.com/processone/ejabberd.git synced 2024-11-28 16:34:13 +01:00

* src/web/ejabberd_web_admin.erl (term_to_string): Show Erlang

terms in one line in Erlang R12 (EJAB-503)

SVN Revision: 1227
This commit is contained in:
Badlop 2008-03-12 22:29:53 +00:00
parent 07454d8f1a
commit 9ae1282854
2 changed files with 9 additions and 1 deletions

View File

@ -1,3 +1,8 @@
2008-03-12 Badlop <badlop@process-one.net>
* src/web/ejabberd_web_admin.erl (term_to_string): Show Erlang
terms in one line in Erlang R12 (EJAB-503)
2008-03-11 Badlop <badlop@process-one.net>
* src/ejabberd_s2s_in.erl (get_cert_domains): When compiling with

View File

@ -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))).