diff options
Diffstat (limited to 'Remote')
| -rw-r--r-- | Remote/S3.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/Remote/S3.hs b/Remote/S3.hs index 3bf15c4ff..60501f2ce 100644 --- a/Remote/S3.hs +++ b/Remote/S3.hs @@ -188,6 +188,8 @@ store r h = fileStorer $ \k f p -> do uploadid <- S3.imurUploadId <$> sendS3Handle h req -- TODO: progress display + -- TODO: avoid needing tons of memory + -- https://github.com/aristidb/aws/issues/142 etags <- liftIO $ withManager $ \mgr -> CB.sourceFile f $= Multipart.chunkedConduit sz |