25
1
mirror of https://github.com/processone/ejabberd.git synced 2024-12-24 17:29:28 +01:00

* src/xml.erl: Removing debug printout.

SVN Revision: 851
This commit is contained in:
Mickaël Rémond 2007-07-31 14:47:52 +00:00
parent 3f0a3784f5
commit 442dd0667b

View File

@ -56,7 +56,6 @@ attr_to_list({Name, Value}) ->
[$\s, crypt(Name), $=, $', crypt(Value), $']. [$\s, crypt(Name), $=, $', crypt(Value), $'].
crypt(S) when is_list(S) -> crypt(S) when is_list(S) ->
io:format("MREMOND crypt~n",[]),
[case C of [case C of
$& -> "&"; $& -> "&";
$< -> "&lt;"; $< -> "&lt;";
@ -70,7 +69,6 @@ crypt(S) when is_binary(S) ->
%% Make a cdata_binary depending on what characters it contains %% Make a cdata_binary depending on what characters it contains
make_text_node(CData) -> make_text_node(CData) ->
io:format("MREMOND CDATA~n",[]),
case cdata_need_escape(CData) of case cdata_need_escape(CData) of
cdata -> cdata ->
CDATA1 = <<"<![CDATA[">>, CDATA1 = <<"<![CDATA[">>,