From 94cafd5217f6c295cc53c4354a40ca672d3acc0b Mon Sep 17 00:00:00 2001 From: Ingela Anderton Andin Date: Wed, 24 Apr 2013 10:55:46 +0200 Subject: ssl: test case fix --- lib/ssl/test/ssl_test_lib.erl | 12 +++++++----- 1 file changed, 7 insertions(+), 5 deletions(-) (limited to 'lib/ssl/test/ssl_test_lib.erl') diff --git a/lib/ssl/test/ssl_test_lib.erl b/lib/ssl/test/ssl_test_lib.erl index 6069a9da95..6b082b4eec 100644 --- a/lib/ssl/test/ssl_test_lib.erl +++ b/lib/ssl/test/ssl_test_lib.erl @@ -983,14 +983,16 @@ is_sane_ecc(openssl) -> is_sane_ecc(_) -> true. -cipher_restriction(Config) -> +cipher_restriction(Config0) -> case is_sane_ecc(openssl) of false -> - Opts = proplists:get_value(server_opts, Config), - NewConfig = proplists:delete(server_opts, Config), + Opts = proplists:get_value(server_opts, Config0), + Config1 = proplists:delete(server_opts, Config0), + VerOpts = proplists:get_value(server_verification_opts, Config1), + Config = proplists:delete(server_verification_opts, Config1), Restricted0 = ssl:cipher_suites() -- ecdsa_suites(), Restricted = Restricted0 -- ecdh_rsa_suites(), - [{server_opts, [{ciphers, Restricted} | Opts]} | NewConfig]; + [{server_opts, [{ciphers, Restricted} | Opts]}, {server_verification_opts, [{ciphers, Restricted} | VerOpts] } | Config]; true -> - Config + Config0 end. -- cgit v1.2.3