aboutsummaryrefslogtreecommitdiffstats
path: root/lib/ssl/test/old_ssl_protocol_SUITE.erl
diff options
context:
space:
mode:
Diffstat (limited to 'lib/ssl/test/old_ssl_protocol_SUITE.erl')
-rw-r--r--lib/ssl/test/old_ssl_protocol_SUITE.erl21
1 files changed, 13 insertions, 8 deletions
diff --git a/lib/ssl/test/old_ssl_protocol_SUITE.erl b/lib/ssl/test/old_ssl_protocol_SUITE.erl
index 0a30c4702b..a957680e20 100644
--- a/lib/ssl/test/old_ssl_protocol_SUITE.erl
+++ b/lib/ssl/test/old_ssl_protocol_SUITE.erl
@@ -64,20 +64,25 @@ init_per_suite(Config) ->
io:format("Config: ~p~n", [Config]),
%% Check if SSL exists. If this case fails, all other cases are skipped
- crypto:start(),
- application:start(public_key),
- case ssl:start() of
- ok -> ssl:stop();
- {error, {already_started, _}} -> ssl:stop();
- Error -> ?t:fail({failed_starting_ssl,Error})
- end,
- Config.
+ case catch crypto:start() of
+ ok ->
+ application:start(public_key),
+ case ssl:start() of
+ ok -> ssl:stop();
+ {error, {already_started, _}} -> ssl:stop();
+ Error -> ?t:fail({failed_starting_ssl,Error})
+ end,
+ Config;
+ _Else ->
+ {skip,"Could not start crypto"}
+ end.
end_per_suite(doc) ->
"This test case has no other purpose than closing the conf case.";
end_per_suite(suite) ->
[];
end_per_suite(Config) ->
+ crypto:stop(),
Config.
%%%%%