mirror of
https://github.com/processone/ejabberd.git
synced 2024-11-24 16:23:40 +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:
parent
07454d8f1a
commit
9ae1282854
@ -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>
|
2008-03-11 Badlop <badlop@process-one.net>
|
||||||
|
|
||||||
* src/ejabberd_s2s_in.erl (get_cert_domains): When compiling with
|
* src/ejabberd_s2s_in.erl (get_cert_domains): When compiling with
|
||||||
|
@ -1067,7 +1067,10 @@ acl_spec_select(ID, Opt) ->
|
|||||||
|
|
||||||
|
|
||||||
term_to_string(T) ->
|
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) ->
|
term_to_id(T) ->
|
||||||
jlib:encode_base64(binary_to_list(term_to_binary(T))).
|
jlib:encode_base64(binary_to_list(term_to_binary(T))).
|
||||||
|
Loading…
Reference in New Issue
Block a user