diff options
author | Björn Gustavsson <[email protected]> | 2012-09-19 15:55:53 +0200 |
---|---|---|
committer | Björn Gustavsson <[email protected]> | 2012-09-20 11:09:40 +0200 |
commit | a0c65862e8beaca2d2c0b9d6d13eca862641994c (patch) | |
tree | 18097ae906fc648bf05298ea35da57d8c2054dd9 /lib/common_test/src/ct_master_logs.erl | |
parent | c24f87e19cc01437c3c7b84e9c3fbeceb8c3b736 (diff) | |
download | otp-a0c65862e8beaca2d2c0b9d6d13eca862641994c.tar.gz otp-a0c65862e8beaca2d2c0b9d6d13eca862641994c.tar.bz2 otp-a0c65862e8beaca2d2c0b9d6d13eca862641994c.zip |
common_test: Don't use undocumented features of io:format()
The Format string argument for io:format() is not documented
to accept an iolist, so we should not depend on it.
Also, it is bad practice to use an arbitrary string as a format
string for io:format(), since it could contain a '~' character
which could trigger a badarg exception.
Fix both problems at the same time by using io:put_chars() to
display the iolist.
Diffstat (limited to 'lib/common_test/src/ct_master_logs.erl')
-rw-r--r-- | lib/common_test/src/ct_master_logs.erl | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/lib/common_test/src/ct_master_logs.erl b/lib/common_test/src/ct_master_logs.erl index 9e61d5b16f..1e65337241 100644 --- a/lib/common_test/src/ct_master_logs.erl +++ b/lib/common_test/src/ct_master_logs.erl @@ -204,7 +204,7 @@ open_ct_master_log(Dir) -> {ok,Fd} = file:open(FullName,[write]), io:format(Fd,header("Common Test Master Log", {[],[1,2],[]}),[]), %% maybe add config info here later - io:format(Fd, config_table([]), []), + io:put_chars(config_table([])), io:format(Fd, "<style>\n" "div.ct_internal { background:lightgrey; color:black }\n" @@ -253,11 +253,11 @@ open_nodedir_index(Dir,StartTime) -> print_nodedir(Node,RunDir,Fd) -> Index = filename:join(RunDir,"index.html"), - io:format(Fd, - ["<tr>\n" - "<td align=center>",atom_to_list(Node),"</td>\n", - "<td align=left><a href=\"",Index,"\">",Index,"</a></td>\n", - "</tr>\n"],[]), + io:put_chars(Fd, + ["<tr>\n" + "<td align=center>",atom_to_list(Node),"</td>\n", + "<td align=left><a href=\"",Index,"\">",Index,"</a></td>\n", + "</tr>\n"]), ok. close_nodedir_index(Fd) -> |