diff options
| author | James Fish <[email protected]> | 2013-05-03 16:27:35 +0100 |
|---|---|---|
| committer | James Fish <[email protected]> | 2013-05-03 16:27:35 +0100 |
| commit | 59c8660a593312f77725507a997428489e9b1ada (patch) | |
| tree | 6e0b760ed2f11d5a1568129f72e41e7c5e3c9bdb /src/ct_helper.erl | |
| parent | 117cb7171106aba8fe7028fbf9ed07a037778bcd (diff) | |
| download | ct_helper-59c8660a593312f77725507a997428489e9b1ada.tar.gz ct_helper-59c8660a593312f77725507a997428489e9b1ada.tar.bz2 ct_helper-59c8660a593312f77725507a997428489e9b1ada.zip | |
Support R15B
Diffstat (limited to 'src/ct_helper.erl')
| -rw-r--r-- | src/ct_helper.erl | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/src/ct_helper.erl b/src/ct_helper.erl index 23ae693..d572d68 100644 --- a/src/ct_helper.erl +++ b/src/ct_helper.erl @@ -26,6 +26,5 @@ -> {CaCert::der_encoded(), Cert::der_encoded(), Key::key()}. make_certs() -> CaInfo = {CaCert, _} = erl_make_certs:make_cert([{key, dsa}]), - {Cert, Key0} = erl_make_certs:make_cert([{key, dsa}, {issuer, CaInfo}]), - Key = erlang:delete_element(3, Key0), - {CaCert, Cert, Key}. + {Cert, {Asn1Type, Der, _}} = erl_make_certs:make_cert([{key, dsa}, {issuer, CaInfo}]), + {CaCert, Cert, {Asn1Type, Der}}. |