redundant comment

This commit is contained in:
Joey Hess 2013-09-04 22:24:01 -04:00
parent 930e6d22d6
commit 15b8acb885

View file

@ -114,7 +114,6 @@ encryptCipher :: Cipher -> EncryptedCipherVariant -> KeyIds -> IO StorableCipher
encryptCipher (Cipher c) variant (KeyIds ks) = do encryptCipher (Cipher c) variant (KeyIds ks) = do
-- gpg complains about duplicate recipient keyids -- gpg complains about duplicate recipient keyids
let ks' = nub $ sort ks let ks' = nub $ sort ks
-- The cipher itself is always encrypted to the given public keys
let params = Gpg.pkEncTo ks' ++ Gpg.stdEncryptionParams False let params = Gpg.pkEncTo ks' ++ Gpg.stdEncryptionParams False
encipher <- Gpg.pipeStrict params c encipher <- Gpg.pipeStrict params c
return $ EncryptedCipher encipher variant (KeyIds ks') return $ EncryptedCipher encipher variant (KeyIds ks')