summaryrefslogtreecommitdiff
path: root/Remote/Helper/Chunked.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2014-07-29 18:47:26 -0400
committerGravatar Joey Hess <joey@kitenet.net>2014-07-29 18:50:20 -0400
commitca0d8f09bdd9f8cbcf77b1c29272418cd68deeb1 (patch)
tree1c917d37585b853db4d3f43761a7b709a2af6c4e /Remote/Helper/Chunked.hs
parenta2dfbf18972339929c49cb77e76cf246ada2acdc (diff)
support chunking for all external special remotes!
Removing code and at the same time adding great features, including upload/download resuming. This commit was sponsored by Romain Lenglet.
Diffstat (limited to 'Remote/Helper/Chunked.hs')
-rw-r--r--Remote/Helper/Chunked.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Remote/Helper/Chunked.hs b/Remote/Helper/Chunked.hs
index ae949abc3..b7522aa89 100644
--- a/Remote/Helper/Chunked.hs
+++ b/Remote/Helper/Chunked.hs
@@ -295,7 +295,7 @@ retrieveChunks retriever u chunkconfig encryptor basek dest basep sink
return True
tosink h _ (FileContent f) = liftIO $ do
sink h Nothing =<< L.readFile f
- nukeFile h
+ nukeFile f
return True
{- Can resume when the chunk's offset is at or before the end of