summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
authorAndrew Cady <d@jerkface.net>2019-10-13 00:56:58 -0400
committerAndrew Cady <d@jerkface.net>2019-10-13 00:56:58 -0400
commit950515be684bd77f8495b43d22dc7770ed2986c2 (patch)
treedb9e9dc521f79b7f536444087063ce290c046e70 /lib
parent41d34947ca8c26c4521058e55d389570b255582a (diff)
fix private key output
Diffstat (limited to 'lib')
-rw-r--r--lib/KeyRing.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/KeyRing.hs b/lib/KeyRing.hs
index cd69042..5f43b4f 100644
--- a/lib/KeyRing.hs
+++ b/lib/KeyRing.hs
@@ -792,8 +792,8 @@ subkeysForExport subspec (KeyData key _ _ subkeys) = do
792data PemType = PemPublicKey | PemPrivateKey | PemCertificate 792data PemType = PemPublicKey | PemPrivateKey | PemCertificate
793 793
794pemTypeString :: PemType -> String 794pemTypeString :: PemType -> String
795pemTypeString PemPublicKey = "PUBLIC KEY" 795pemTypeString PemPublicKey = "PUBLIC KEY"
796pemTypeString PemPrivateKey = "PRIVATE KEY" 796pemTypeString PemPrivateKey = "RSA PRIVATE KEY"
797pemTypeString PemCertificate = "CERTIFICATE" 797pemTypeString PemCertificate = "CERTIFICATE"
798 798
799writePEM :: PemType -> String -> String 799writePEM :: PemType -> String -> String