amazonka-s3-streaming 0.2.0.0 → 0.2.0.1
raw patch · 4 files changed
+9/−5 lines, 4 filesdep ~amazonka-s3-streamingPVP ok
version bump matches the API change (PVP)
Dependency ranges changed: amazonka-s3-streaming
API changes (from Hackage documentation)
Files
- Changelog.md +4/−0
- README.md +1/−1
- amazonka-s3-streaming.cabal +2/−2
- src/Network/AWS/S3/StreamingUpload.hs +2/−2
Changelog.md view
@@ -1,5 +1,9 @@ # Changelog - amazonka-s3-streaming +## 0.2.0.1+ * Fixed a bug with the printf format strings which would lead to a crash (Thanks @JakeOShannessy+ for reporting).+ ## 0.2.0.0 * Fixed a potential bug with very large uploads where the chunksize might be too small for the limit of 10,000 chunks per upload (#6).
README.md view
@@ -1,3 +1,3 @@ # amazonka-s3-streaming [](https://travis-ci.org/axman6/amazonka-s3-streaming) -Provides a conduit based streaming interface and a concurrent interface to uploading data to S3 using the Multipart API.+Provides a conduit based streaming interface and a concurrent interface to uploading data to S3 using the Multipart API. Also provides method to upload files or bytestrings of known size in parallel.
amazonka-s3-streaming.cabal view
@@ -1,5 +1,5 @@ name: amazonka-s3-streaming-version: 0.2.0.0+version: 0.2.0.1 cabal-version: >=1.10 build-type: Simple license: BSD3@@ -55,7 +55,7 @@ amazonka >=1.4.3 && <1.5, amazonka-core >=1.4.3 && <1.5, amazonka-s3 >=1.4.3 && <1.5,- amazonka-s3-streaming >=0.2.0.0 && <0.3,+ amazonka-s3-streaming >=0.2.0.1 && <0.3, conduit-extra >=1.1.15 && <1.2, conduit >=1.2.8 && <1.3, bytestring >=0.10.8.1 && <0.11,
src/Network/AWS/S3/StreamingUpload.hs view
@@ -128,7 +128,7 @@ (hashFinalize $ hashUpdate ctx bs) (D.snoc bss bs) - logStr $ printf "\n**** Uploaded part %d size $d\n" partnum bufsize+ logStr $ printf "\n**** Uploaded part %d size %d\n" partnum bufsize let part = completedPart partnum <$> (rs ^. uprsETag) #if MIN_VERSION_amazonka_s3(1,4,1) !_ = rnf part@@ -141,7 +141,7 @@ then do rs <- partUploader partnum bufsize (hashFinalize ctx) bss - logStr $ printf "\n**** Uploaded (final) part %d size $d\n" partnum bufsize+ logStr $ printf "\n**** Uploaded (final) part %d size %d\n" partnum bufsize let allParts = D.toList $ D.snoc completed $ completedPart partnum <$> (rs ^. uprsETag) pure $ nonEmpty =<< sequence allParts