diff options
| author | Magnus Henoch <[email protected]> | 2016-04-27 17:14:13 +0100 |
|---|---|---|
| committer | Magnus Henoch <[email protected]> | 2016-04-27 17:14:13 +0100 |
| commit | 2b1767d29f7bd9d5d611b28624d9dd8bdbc620ce (patch) | |
| tree | 73d572943e4753b4ad8b741b71b147674b669f3c /lib/ssl | |
| parent | 4db8640612bed0b104c4d66c7acf3ad4d95fc3b0 (diff) | |
| download | otp-2b1767d29f7bd9d5d611b28624d9dd8bdbc620ce.tar.gz otp-2b1767d29f7bd9d5d611b28624d9dd8bdbc620ce.tar.bz2 otp-2b1767d29f7bd9d5d611b28624d9dd8bdbc620ce.zip | |
Fix db handle for TLS distribution crl_cache opts
'internal' is reserved for the ssl_crl_cache module. Since the stub
CRL cache implementation in the test module essentially uses the file
system as its "database", let's pass the directory as database handle.
Diffstat (limited to 'lib/ssl')
| -rw-r--r-- | lib/ssl/test/ssl_dist_SUITE.erl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/ssl/test/ssl_dist_SUITE.erl b/lib/ssl/test/ssl_dist_SUITE.erl index 43771eea8e..fa36b424ce 100644 --- a/lib/ssl/test/ssl_dist_SUITE.erl +++ b/lib/ssl/test/ssl_dist_SUITE.erl @@ -581,7 +581,7 @@ crl_cache_check_pass(Config) when is_list(Config) -> NodeDir = filename:join([PrivDir, "Certs"]), DistOpts = "-ssl_dist_opt " "client_crl_check true " - "client_crl_cache {ssl_dist_SUITE,{internal,\\\"" ++ NodeDir ++ "\\\"}}", + "client_crl_cache {ssl_dist_SUITE,{\\\"" ++ NodeDir ++ "\\\",[]}}", NewConfig = [{many_verify_opts, true}, {additional_dist_opts, DistOpts}] ++ Config, @@ -607,7 +607,7 @@ crl_cache_check_fail(Config) when is_list(Config) -> NodeDir = filename:join([PrivDir, "Certs"]), DistOpts = "-ssl_dist_opt " "client_crl_check true " - "client_crl_cache {ssl_dist_SUITE,{internal,\\\"" ++ NodeDir ++ "\\\"}}", + "client_crl_cache {ssl_dist_SUITE,{\\\"" ++ NodeDir ++ "\\\",[]}}", NewConfig = [{many_verify_opts, true}, %% The server uses a revoked certificate. @@ -631,7 +631,7 @@ crl_cache_check_fail(Config) when is_list(Config) -> lookup(_DistributionPoint, _DbHandle) -> not_available. -select({rdnSequence, NameParts}, {_, NodeDir}) -> +select({rdnSequence, NameParts}, {NodeDir, _}) -> %% Extract the CN from the issuer name... [CN] = [CN || [#'AttributeTypeAndValue'{ |