From 616be2a18cea1ecfee327105a58f4f397a7e28f1 Mon Sep 17 00:00:00 2001
From: Linus Nordberg <linus@nordu.net>
Date: Fri, 25 Nov 2016 14:29:00 +0100
Subject: Manual rebase onto master with map/robust-distribution.

---
 src/catlfish_compat.erl | 10 ----------
 1 file changed, 10 deletions(-)

(limited to 'src/catlfish_compat.erl')

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) ->
-- 
cgit v1.1