diff options
author | Micael Karlberg <[email protected]> | 2019-07-10 19:03:04 +0200 |
---|---|---|
committer | Micael Karlberg <[email protected]> | 2019-07-17 11:47:49 +0200 |
commit | b4730a1efd315d7b4e410f34a2b66cb7bfd77889 (patch) | |
tree | eb7e3bd61e08c98b2577623db20a0640ffe87bf4 /lib/megaco/test/megaco_flex_test.erl | |
parent | 4f377cd09e0e313bc2fe03c003db7f652934c618 (diff) | |
download | otp-b4730a1efd315d7b4e410f34a2b66cb7bfd77889.tar.gz otp-b4730a1efd315d7b4e410f34a2b66cb7bfd77889.tar.bz2 otp-b4730a1efd315d7b4e410f34a2b66cb7bfd77889.zip |
[megaco|test] erlang:now() and random cleanup
Removed all use of erlang:now() and the deprecated random module
from the test suite.
Diffstat (limited to 'lib/megaco/test/megaco_flex_test.erl')
-rw-r--r-- | lib/megaco/test/megaco_flex_test.erl | 17 |
1 files changed, 2 insertions, 15 deletions
diff --git a/lib/megaco/test/megaco_flex_test.erl b/lib/megaco/test/megaco_flex_test.erl index 999d1abc6c..27c46a3b47 100644 --- a/lib/megaco/test/megaco_flex_test.erl +++ b/lib/megaco/test/megaco_flex_test.erl @@ -1,7 +1,7 @@ %% %% %CopyrightBegin% %% -%% Copyright Ericsson AB 2008-2016. All Rights Reserved. +%% Copyright Ericsson AB 2008-2019. All Rights Reserved. %% %% Licensed under the Apache License, Version 2.0 (the "License"); %% you may not use this file except in compliance with the License. @@ -219,18 +219,5 @@ p(F, A) -> TC = get(tc), io:format("*** [~s] ~p ~w ***" "~n " ++ F ++ "~n", - [formated_timestamp(), self(), TC | A]). - -formated_timestamp() -> - format_timestamp(erlang:now()). - -format_timestamp({_N1, _N2, N3} = Now) -> - {Date, Time} = calendar:now_to_datetime(Now), - {YYYY, MM, DD} = Date, - {Hour, Min, Sec} = Time, - FormatDate = - io_lib:format("~.4w:~.2.0w:~.2.0w ~.2.0w:~.2.0w:~.2.0w 4~w", - [YYYY,MM,DD,Hour,Min,Sec,round(N3/1000)]), - lists:flatten(FormatDate). - + [?FTS(), self(), TC | A]). |