From 59c8660a593312f77725507a997428489e9b1ada Mon Sep 17 00:00:00 2001
From: James Fish <james@fishcakez.com>
Date: Fri, 3 May 2013 16:27:35 +0100
Subject: Support R15B

---
 src/erl_make_certs.erl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'src/erl_make_certs.erl')

diff --git a/src/erl_make_certs.erl b/src/erl_make_certs.erl
index acd5459..82923cb 100644
--- a/src/erl_make_certs.erl
+++ b/src/erl_make_certs.erl
@@ -137,10 +137,10 @@ decode_key(PemBin, Pw) ->
 
 encode_key(Key = #'RSAPrivateKey'{}) ->
     {ok, Der} = 'OTP-PUB-KEY':encode('RSAPrivateKey', Key),
-    {'RSAPrivateKey', Der, not_encrypted};
+    {'RSAPrivateKey', iolist_to_binary(Der), not_encrypted};
 encode_key(Key = #'DSAPrivateKey'{}) ->
     {ok, Der} = 'OTP-PUB-KEY':encode('DSAPrivateKey', Key),
-    {'DSAPrivateKey', Der, not_encrypted}.
+    {'DSAPrivateKey', iolist_to_binary(Der), not_encrypted}.
 
 make_tbs(SubjectKey, Opts) ->    
     Version = list_to_atom("v"++integer_to_list(proplists:get_value(version, Opts, 3))),
-- 
cgit v1.2.3