mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

cleanup

Browse source
This commit is contained in:
Joey Hess 2011-04-17 13:11:38 -04:00
parent e8a94d914b
commit d9690a9b5d
2 changed files with 16 additions and 15 deletions
Download patch file Download diff file Expand all files Collapse all files

2
Remote/Bup.hs
View file

@ -127,7 +127,7 @@ storeEncrypted r buprepo (cipher, enck) k = do
params <- bupSplitParams r buprepo enck (Param "-")
liftIO $ catchBool $ do
content <- L.readFile src
withEncryptedContentHandle cipher content $ \h -> do
withEncryptedHandle cipher content $ \h -> do
pipeBup params (Just h) Nothing
retrieve :: BupRepo -> Key -> FilePath -> Annex Bool