summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMicael Karlberg <bmk@erlang.org>2013-05-28 17:01:11 +0200
committerMicael Karlberg <bmk@erlang.org>2013-05-28 17:01:11 +0200
commitc64d201c559ca912e4730b18daf8603c2fcd2e21 (patch)
treef59ddd214d41adcac60fb8c0a3595cb2b21496fb
parentf64191ff6e73662981581797933db81e7dff4b2a (diff)
downloaderlang-c64d201c559ca912e4730b18daf8603c2fcd2e21.tar.gz
[snmp] Updated (all) test code to support new crypto interface
Test suite utility function for verifying crypto support updated to use new crypto interface. OTP-11009
-rw-r--r--lib/snmp/test/snmp_test_lib.erl9
1 files changed, 2 insertions, 7 deletions
diff --git a/lib/snmp/test/snmp_test_lib.erl b/lib/snmp/test/snmp_test_lib.erl
index f0abae73e8..505332b586 100644
--- a/lib/snmp/test/snmp_test_lib.erl
+++ b/lib/snmp/test/snmp_test_lib.erl
@@ -435,7 +435,7 @@ crypto_start() ->
end.
crypto_support() ->
- crypto_support([md5_mac_96, sha_mac_96], []).
+ crypto_support([md5, sha], []).
crypto_support([], []) ->
yes;
@@ -450,12 +450,7 @@ crypto_support([Func|Funcs], Acc) ->
end.
is_crypto_supported(Func) ->
- %% The 'catch' handles the case when 'crypto' is
- %% not present in the system (or not started).
- case (catch lists:member(Func, crypto:info())) of
- true -> true;
- _ -> false
- end.
+ snmp_misc:is_crypto_supported(Func).
%% ----------------------------------------------------------------