From 1f76551dce12e7209422ee65980315bb60eb771a Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Thu, 6 Feb 2014 18:25:31 -0400
Subject: Fix initremote with encryption=pubkey to work with S3, glacier,
 webdav, and external special remotes.

---
 Creds.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'Creds.hs')

diff --git a/Creds.hs b/Creds.hs
index 7c300dd07..3bd87a522 100644
--- a/Creds.hs
+++ b/Creds.hs
@@ -51,7 +51,7 @@ setRemoteCredPair' c storage creds
 		return c
 
 	storeconfig key (Just cipher) = do
-		s <- liftIO $ encrypt [] cipher
+		s <- liftIO $ encrypt (getGpgEncParams c) cipher
 			(feedBytes $ L.pack $ encodeCredPair creds)
 			(readBytes $ return . L.unpack)
 		return $ M.insert key (toB64 s) c
-- 
cgit v1.2.3