aboutsummaryrefslogtreecommitdiff
path: root/src/xml.erl
diff options
context:
space:
mode:
authorBadlop <badlop@process-one.net>2009-05-06 16:54:43 +0000
committerBadlop <badlop@process-one.net>2009-05-06 16:54:43 +0000
commitfec3742aaacbfac48266afe72e64a3a9f5562d02 (patch)
tree54b3ef002b086b2e05231f60c12ecced9a1d9ae8 /src/xml.erl
parent* src/Makefile.in: Prevent Erlang R13B compilation warning: (diff)
Replace TYPE/1 with is_TYPE/1 (EJAB-922)
SVN Revision: 2057
Diffstat (limited to '')
-rw-r--r--src/xml.erl2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/xml.erl b/src/xml.erl
index 846d93c9b..592ad5b99 100644
--- a/src/xml.erl
+++ b/src/xml.erl
@@ -66,7 +66,7 @@ element_to_string_nocatch(El) ->
[$<, Name, attrs_to_list(Attrs), $/, $>]
end;
%% We do not crypt CDATA binary, but we enclose it in XML CDATA
- {xmlcdata, CData} when binary(CData) ->
+ {xmlcdata, CData} when is_binary(CData) ->
?ESCAPE_BINARY(CData);
%% We crypt list and possibly binaries if full XML usage is
%% disabled unsupported (implies a conversion to list).