summaryrefslogtreecommitdiff
path: root/lib/KeyRing/BuildKeyDB.hs
diff options
context:
space:
mode:
authorJoe Crayne <joe@jerkface.net>2019-07-11 22:17:09 -0400
committerJoe Crayne <joe@jerkface.net>2019-07-11 22:17:09 -0400
commit365bdcd8d9f4a08aaae35fc27722d268f4af9041 (patch)
treeacc5aa18e90eb7f90174ca172136e49198495fbd /lib/KeyRing/BuildKeyDB.hs
parenta2cfd42e569e2f8d0a7011573f72ba0876ae16e8 (diff)
WIP: verify command to verify clear-sign PGP signatures.
Diffstat (limited to 'lib/KeyRing/BuildKeyDB.hs')
-rw-r--r--lib/KeyRing/BuildKeyDB.hs12
1 files changed, 6 insertions, 6 deletions
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
186 let doDecrypt = transcode (Unencrypted,S2K 100 "") 186 let doDecrypt = transcode (Unencrypted,S2K 100 "")
187 187
188 let wk = fmap packet mwk 188 let wk = fmap packet mwk
189 rt0 = KeyRingRuntime { rtPubring = homepubPath ctx 189 rt0 = KeyRingRuntime { rtPubring = homepubPath ctx
190 , rtSecring = homesecPath ctx 190 , rtSecring = homesecPath ctx
191 , rtGrip = grip 191 , rtGrip = grip
192 , rtWorkingKey = wk 192 , rtWorkingKey = wk
193 , rtRingAccess = accs 193 , rtRingAccess = accs
194 , rtKeyDB = Map.empty 194 , rtKeyDB = Map.empty
195 , rtPassphrases = transcode 195 , rtPassphrases = transcode
196 } 196 }
197 -- autosigns and deletes 197 -- autosigns and deletes