diff options
| author | Siri Hansen <[email protected]> | 2017-07-06 16:59:47 +0200 |
|---|---|---|
| committer | Siri Hansen <[email protected]> | 2017-09-15 17:07:50 +0200 |
| commit | 09e2288b7a42345ea76e5e23ad93346c63efb06d (patch) | |
| tree | 80a0814a8156544348979fcb26653fce01f6734c /lib/common_test/src/ct_framework.erl | |
| parent | 532ab69fce9b7d1dc6974632ed8d17fdab68bd1a (diff) | |
| download | otp-09e2288b7a42345ea76e5e23ad93346c63efb06d.tar.gz otp-09e2288b7a42345ea76e5e23ad93346c63efb06d.tar.bz2 otp-09e2288b7a42345ea76e5e23ad93346c63efb06d.zip | |
common_test: Do not use deprecated functions in string(3)
Diffstat (limited to 'lib/common_test/src/ct_framework.erl')
| -rw-r--r-- | lib/common_test/src/ct_framework.erl | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/lib/common_test/src/ct_framework.erl b/lib/common_test/src/ct_framework.erl index 6066470233..7f7e9ae6f9 100644 --- a/lib/common_test/src/ct_framework.erl +++ b/lib/common_test/src/ct_framework.erl @@ -921,9 +921,10 @@ error_notification(Mod,Func,_Args,{Error,Loc}) -> end, ErrorStr = case ErrorSpec of {badmatch,Descr} -> - Descr1 = lists:flatten(io_lib:format("~tP",[Descr,10])), - if length(Descr1) > 50 -> - Descr2 = string:substr(Descr1,1,50), + Descr1 = io_lib:format("~tP",[Descr,10]), + DescrLength = string:length(Descr1), + if DescrLength > 50 -> + Descr2 = string:slice(Descr1,0,50), io_lib:format("{badmatch,~ts...}",[Descr2]); true -> io_lib:format("{badmatch,~ts}",[Descr1]) |