diff options
| author | Micael Karlberg <bmk@erlang.org> | 2021-08-06 12:52:32 +0200 |
|---|---|---|
| committer | Micael Karlberg <bmk@erlang.org> | 2021-08-30 16:41:16 +0200 |
| commit | ecf6b31a8e28f523e3e88bd0a8c2f5ea52e4237a (patch) | |
| tree | 0771fcf48b07c02ddc8e626bcec0dde8e447f143 | |
| parent | 5191ecfece28a6577d42b4ee0ee6c2c7bba8114c (diff) | |
| download | erlang-ecf6b31a8e28f523e3e88bd0a8c2f5ea52e4237a.tar.gz | |
[megaco|test] Print (app) environment at suite init
| -rw-r--r-- | lib/megaco/test/megaco_test_lib.erl | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/lib/megaco/test/megaco_test_lib.erl b/lib/megaco/test/megaco_test_lib.erl index 2627cb3f32..e39e1e3e8a 100644 --- a/lib/megaco/test/megaco_test_lib.erl +++ b/lib/megaco/test/megaco_test_lib.erl @@ -481,6 +481,17 @@ pprint(F, A) -> init_per_suite(Config) -> + p("megaco environment: " + "~n (megaco) app: ~p" + "~n (all) init: ~p" + "~n (megaco) init: ~p", + [application:get_all_env(megaco), + init:get_arguments(), + case init:get_argument(megaco) of + {ok, Args} -> Args; + error -> undefined + end]), + ct:timetrap(minutes(3)), try analyze_and_print_host_info() of @@ -2215,6 +2226,7 @@ p(F, A) -> print(Pre, F, A) -> io:format("*** [~s] [~s] ~p " ++ F ++ "~n", [?FTS(), Pre, self() | A]). + %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% explicit_inet_backend() -> |