Oops

1 files changed, 1 insertions, 1 deletions

diff --git a/kiki.hs b/kiki.hs
index 789bc07..d468774 100644
--- a/kiki.hs
+++ b/kiki.hs
@@ -242,7 +242,7 @@ secretToPublic pkt@(SecretKeyPacket {}) =
     PublicKeyPacket { version = version pkt
                     , timestamp = timestamp pkt
                     , key_algorithm = key_algorithm pkt
-                    , ecc_curve = def
+                    , ecc_curve = ecc_curve pkt
                     , key = let seckey = key pkt
                                 pubs = public_key_fields (key_algorithm pkt)
                             in filter (\(k,v) -> k `elem` pubs) seckey