diff options
| author | Henrik Nord <[email protected]> | 2015-06-08 14:37:35 +0200 |
|---|---|---|
| committer | Henrik Nord <[email protected]> | 2015-06-08 14:39:30 +0200 |
| commit | f1dede329de90e4805cd21a43bb5b19e288c81a3 (patch) | |
| tree | aab920bd21326f2df820c9c6499d1dcfed2d208b /lib/xmerl/src/xmerl_otpsgml.erl | |
| parent | c825356561bfcb4447cb4298da353244c465d3b3 (diff) | |
| parent | bca6864c181eb8c14a0b8e47afb3dd6206e6ae7c (diff) | |
| download | otp-f1dede329de90e4805cd21a43bb5b19e288c81a3.tar.gz otp-f1dede329de90e4805cd21a43bb5b19e288c81a3.tar.bz2 otp-f1dede329de90e4805cd21a43bb5b19e288c81a3.zip | |
Merge branch 'richcarl/shut-up-xmerl'
* richcarl/shut-up-xmerl:
Stop xmerl printing to stdout
OTP-12810
Diffstat (limited to 'lib/xmerl/src/xmerl_otpsgml.erl')
| -rw-r--r-- | lib/xmerl/src/xmerl_otpsgml.erl | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/lib/xmerl/src/xmerl_otpsgml.erl b/lib/xmerl/src/xmerl_otpsgml.erl index 38688e788f..b9649ecbad 100644 --- a/lib/xmerl/src/xmerl_otpsgml.erl +++ b/lib/xmerl/src/xmerl_otpsgml.erl @@ -34,6 +34,7 @@ export_text/1]). -include("xmerl.hrl"). +-include("xmerl_internal.hrl"). '#xml-inheritance#'() -> [xmerl_sgml]. @@ -58,7 +59,7 @@ %% the scope of a markup is not extended by mistake.) '#element#'(Tag, Data, Attrs, _Parents, _E) -> -% io:format("parents:\n~p\n",[_Parents]), +% ?dbg("parents:\n~p\n",[_Parents]), case convert_tag(Tag,Attrs) of {false,NewTag,NewAttrs} -> markup(NewTag, NewAttrs, Data); @@ -108,7 +109,7 @@ convert_aref([#xmlAttribute{name = href, value = V}|_Rest]) -> seealso end; convert_aref([#xmlAttribute{name = K}|Rest]) -> - io:format("Warning: ignoring attribute \'~p\' for tag \'a\'\n",[K]), + error_logger:warning_msg("ignoring attribute \'~p\' for tag \'a\'\n",[K]), convert_aref(Rest). convert_aref_attrs(url,Attrs) -> Attrs; @@ -130,7 +131,7 @@ html_content([_H|T]) -> % convert_seealso_attrs([#xmlAttribute{name = href, value = V} = A|Rest]) -> % [A#xmlAttribute{name=marker,value=normalize_web_ref(V)}|convert_seealso_attrs(Rest)]; % convert_seealso_attrs([#xmlAttribute{name = K}|Rest]) -> -% io:format("Warning: ignoring attribute \'~p\' for tag \'a\'\n",[K]), +% error_logger:warning_msg("ignoring attribute \'~p\' for tag \'a\'\n",[K]), % convert_seealso_attrs(Rest); % convert_seealso_attrs([]) -> % []. |