diff options
| author | Linus Nordberg <linus@nordu.net> | 2016-11-25 14:29:00 +0100 |
|---|---|---|
| committer | Linus Nordberg <linus@nordu.net> | 2016-11-25 14:37:29 +0100 |
| commit | 616be2a18cea1ecfee327105a58f4f397a7e28f1 (patch) | |
| tree | 520ea9a3fbe29ac78ce76c4b4527a70e8a70ae1d /src/catlfish_compat.erl | |
| parent | d8ce0c149f10d841dc19cbc32c8fc844aa4d65fb (diff) | |
Manual rebase onto master with map/robust-distribution.
Diffstat (limited to 'src/catlfish_compat.erl')
| -rw-r--r-- | src/catlfish_compat.erl | 10 |
1 files changed, 0 insertions, 10 deletions
diff --git a/src/catlfish_compat.erl b/src/catlfish_compat.erl index 6dab325..183eb44 100644 --- a/src/catlfish_compat.erl +++ b/src/catlfish_compat.erl @@ -10,11 +10,6 @@ poison_val(Value) -> poison_val(erlang:system_info(otp_release), Value). %% @doc Dig out alg, params and key from issuer. -unpack_issuer("R16" ++ _, Issuer) -> - #'SubjectPublicKeyInfo'{ - algorithm = #'AlgorithmIdentifier'{algorithm = Alg, parameters = Params}, - subjectPublicKey = {0, Key}} = Issuer, - {Alg, Params, Key}; unpack_issuer("17", Issuer) -> #'SubjectPublicKeyInfo'{ algorithm = #'AlgorithmIdentifier'{algorithm = Alg, parameters = Params}, @@ -27,9 +22,6 @@ unpack_issuer("18", Issuer) -> {Alg, Params, Key}. %% @doc Unpack a #'Certificate'.signature, return the signature. -unpack_signature("R16" ++ _, Signature) -> - {_, Sig} = Signature, - Sig; unpack_signature("17", Signature) -> {_, Sig} = Signature, Sig; @@ -37,8 +29,6 @@ unpack_signature("18", Signature) -> Signature. %% Use a list for R17 and a binary for newer versions. -poison_val("R16" ++ _, Val) -> - Val; poison_val("17", Val) -> Val; poison_val("18", Val) -> |