1 files changed, 1 insertions, 1 deletions

diff --git a/lib/KeyRing/BuildKeyDB.hs b/lib/KeyRing/BuildKeyDB.hs
index 24b39b1..dd204d1 100644
--- a/lib/KeyRing/BuildKeyDB.hs
+++ b/lib/KeyRing/BuildKeyDB.hs
@@ -199,7 +199,7 @@ buildKeyDB ctx grip0 keyring = do
             accs = fmap (access . fst) ringPackets
         return (spilled,mwk,grip,accs,keys,fmap snd unspilled)
 
-    transcode <- makeMemoizingDecrypter keyring ctx (mwk,keyqs)
+    transcode <- makeMemoizingDecrypter (opPassphrases keyring) ctx (mwk,keyqs)
     let doDecrypt = transcode (Unencrypted,S2K 100 "")
 
     let wk = fmap packet mwk