diff options
| author | Hans Bolinder <[email protected]> | 2017-06-27 12:46:01 +0200 |
|---|---|---|
| committer | Siri Hansen <[email protected]> | 2017-07-06 17:53:22 +0200 |
| commit | 796a110362b780abadcb114940e6fadd14105ff4 (patch) | |
| tree | 81042e3b14ffcbc721ea0433f1f8bcd8a5c1f96a /lib/tools/src/cover.erl | |
| parent | bba078a97b70137fd0ab7d0f883886406cc6d82c (diff) | |
| download | otp-796a110362b780abadcb114940e6fadd14105ff4.tar.gz otp-796a110362b780abadcb114940e6fadd14105ff4.tar.bz2 otp-796a110362b780abadcb114940e6fadd14105ff4.zip | |
tools: Do not use deprecated functions in string(3)
Diffstat (limited to 'lib/tools/src/cover.erl')
| -rw-r--r-- | lib/tools/src/cover.erl | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/lib/tools/src/cover.erl b/lib/tools/src/cover.erl index 5517882ffa..801bbc7461 100644 --- a/lib/tools/src/cover.erl +++ b/lib/tools/src/cover.erl @@ -2439,11 +2439,11 @@ do_analyse_to_file1(Module, OutFile, ErlFile, HTML) -> Timestamp = io_lib:format("~p-~s-~s at ~s:~s:~s", [Y, - string:right(integer_to_list(Mo), 2, $0), - string:right(integer_to_list(D), 2, $0), - string:right(integer_to_list(H), 2, $0), - string:right(integer_to_list(Mi), 2, $0), - string:right(integer_to_list(S), 2, $0)]), + string:pad(integer_to_list(Mo), 2, leading, $0), + string:pad(integer_to_list(D), 2, leading, $0), + string:pad(integer_to_list(H), 2, leading, $0), + string:pad(integer_to_list(Mi), 2, leading, $0), + string:pad(integer_to_list(S), 2, leading, $0)]), H2Bin = unicode:characters_to_binary( ["File generated from ",ErlFile," by COVER ", @@ -2493,12 +2493,12 @@ print_lines(Module, CovLines, InFd, OutFd, L, HTML) -> if N=:=0, HTML=:=true -> LineNoNL = Line -- "\n", Str = " 0", - %%Str = string:right("0", 6, 32), + %%Str = string:pad("0", 6, leading, $\s), RedLine = ["<font color=red>",Str,fill1(), LineNoNL,"</font>\n"], ok = file:write(OutFd, RedLine); N < 1000000 -> - Str = string:right(integer_to_list(N), 6, 32), + Str = string:pad(integer_to_list(N), 6, leading, $\s), ok = file:write(OutFd, [Str,fill1(),Line]); N < 10000000 -> Str = integer_to_list(N), |