diff options
author | Badlop <badlop@process-one.net> | 2008-03-12 22:29:53 +0000 |
---|---|---|
committer | Badlop <badlop@process-one.net> | 2008-03-12 22:29:53 +0000 |
commit | 9ae1282854d8fa0e5b417d198c2c4a165ba1ce7d (patch) | |
tree | 15b7ca94fff56ef3dc63062902dec2623c79f272 /src/web/ejabberd_web_admin.erl | |
parent | * src/ejabberd_s2s_in.erl (get_cert_domains): When compiling with (diff) |
* src/web/ejabberd_web_admin.erl (term_to_string): Show Erlang
terms in one line in Erlang R12 (EJAB-503)
SVN Revision: 1227
Diffstat (limited to 'src/web/ejabberd_web_admin.erl')
-rw-r--r-- | src/web/ejabberd_web_admin.erl | 5 |
1 files changed, 4 insertions, 1 deletions
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))). |