1 files changed, 1 insertions, 1 deletions
diff --git a/Crypto.hs b/Crypto.hs
index 0a403d117..be326bf4c 100644
--- a/Crypto.hs
+++ b/Crypto.hs
@@ -100,7 +100,7 @@ encryptCipher :: Cipher -> KeyIds -> IO StorableCipher
 encryptCipher (Cipher c) (KeyIds ks) = do
 	-- gpg complains about duplicate recipient keyids
 	let ks' = nub $ sort ks
-	encipher <- Gpg.pipeStrict ([ Params "--encrypt" ] ++ recipients ks') c
+	encipher <- Gpg.pipeStrict (Params "--encrypt" : recipients ks') c
 	return $ EncryptedCipher encipher (KeyIds ks')
   where
 	recipients l = force_recipients :