diff options
| author | Siri Hansen <[email protected]> | 2017-05-31 19:13:36 +0200 |
|---|---|---|
| committer | Siri Hansen <[email protected]> | 2017-06-16 11:52:20 +0200 |
| commit | 9d95abb3597eb4e19df40704fe8533b5d384d3e9 (patch) | |
| tree | 69ac5ce1be04f70fedb84431362d576b1a61b484 /lib/common_test/src/ct.erl | |
| parent | d3a53ae2b2800b33f3b25b83ff2314e64153c2aa (diff) | |
| download | otp-9d95abb3597eb4e19df40704fe8533b5d384d3e9.tar.gz otp-9d95abb3597eb4e19df40704fe8533b5d384d3e9.tar.bz2 otp-9d95abb3597eb4e19df40704fe8533b5d384d3e9.zip | |
[ct] Print unicode atoms and strings correctly in common_test logs
And use correct encoding when printing to files.
Diffstat (limited to 'lib/common_test/src/ct.erl')
| -rw-r--r-- | lib/common_test/src/ct.erl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/common_test/src/ct.erl b/lib/common_test/src/ct.erl index 7716afe0bd..19b0ee20fe 100644 --- a/lib/common_test/src/ct.erl +++ b/lib/common_test/src/ct.erl @@ -917,13 +917,13 @@ comment(Comment) when is_list(Comment) -> Formatted = case (catch io_lib:format("~ts",[Comment])) of {'EXIT',_} -> % it's a list not a string - io_lib:format("~p",[Comment]); + io_lib:format("~tp",[Comment]); String -> String end, send_html_comment(lists:flatten(Formatted)); comment(Comment) -> - Formatted = io_lib:format("~p",[Comment]), + Formatted = io_lib:format("~tp",[Comment]), send_html_comment(lists:flatten(Formatted)). %%%----------------------------------------------------------------- |