From 365bdcd8d9f4a08aaae35fc27722d268f4af9041 Mon Sep 17 00:00:00 2001 From: Joe Crayne Date: Thu, 11 Jul 2019 22:17:09 -0400 Subject: WIP: verify command to verify clear-sign PGP signatures. --- lib/KeyRing/BuildKeyDB.hs | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) (limited to 'lib/KeyRing') diff --git a/lib/KeyRing/BuildKeyDB.hs b/lib/KeyRing/BuildKeyDB.hs index afee71a..a3df62d 100644 --- a/lib/KeyRing/BuildKeyDB.hs +++ b/lib/KeyRing/BuildKeyDB.hs @@ -186,12 +186,12 @@ buildKeyDB ctx grip0 keyring = do let doDecrypt = transcode (Unencrypted,S2K 100 "") let wk = fmap packet mwk - rt0 = KeyRingRuntime { rtPubring = homepubPath ctx - , rtSecring = homesecPath ctx - , rtGrip = grip - , rtWorkingKey = wk - , rtRingAccess = accs - , rtKeyDB = Map.empty + rt0 = KeyRingRuntime { rtPubring = homepubPath ctx + , rtSecring = homesecPath ctx + , rtGrip = grip + , rtWorkingKey = wk + , rtRingAccess = accs + , rtKeyDB = Map.empty , rtPassphrases = transcode } -- autosigns and deletes -- cgit v1.2.3