rsync: Fix bug introduced in last release that broke encrypted rsync special remotes.

This commit is contained in:
Joey Hess 2012-11-27 16:29:31 -04:00
parent 83aa8187c6
commit 5ff666ec99
3 changed files with 7 additions and 1 deletions

View file

@ -110,7 +110,7 @@ store o k _f p = rsyncSend o p k <=< inRepo $ gitAnnexLocation k
storeEncrypted :: RsyncOpts -> (Cipher, Key) -> Key -> MeterUpdate -> Annex Bool
storeEncrypted o (cipher, enck) k p = withTmp enck $ \tmp -> do
src <- inRepo $ gitAnnexLocation k
liftIO $ decrypt cipher (feedFile src) $
liftIO $ encrypt cipher (feedFile src) $
readBytes $ L.writeFile tmp
rsyncSend o p enck tmp