diff --git a/Changelog.md b/Changelog.md
--- a/Changelog.md
+++ b/Changelog.md
@@ -1,9 +1,15 @@
 # Changelog - amazonka-s3-streaming
 
-# 0.2.0.3
+## 0.2.0.5
+- Fix compatibility with 
+
+## 0.2.0.4
+- Make building s3upload executable optional
+
+## 0.2.0.3
  * Make all library generated messages use Debug level not Info
 
-# 0.2.0.2
+## 0.2.0.2
  * Update to mmorph < 1.2
 
 ## 0.2.0.1
diff --git a/README.md b/README.md
--- a/README.md
+++ b/README.md
@@ -3,3 +3,4 @@
 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.
 
 The documentation can be found on [Hackage](https://hackage.haskell.org/package/amazonka-s3-streaming).
+
diff --git a/amazonka-s3-streaming.cabal b/amazonka-s3-streaming.cabal
--- a/amazonka-s3-streaming.cabal
+++ b/amazonka-s3-streaming.cabal
@@ -1,5 +1,5 @@
 name:                amazonka-s3-streaming
-version:             0.2.0.4
+version:             0.2.0.5
 synopsis:            Provides conduits to upload data to S3 using the Multipart API
 description:         Provides a conduit based streaming interface and a concurrent interface to
                      uploading data to S3 using the Multipart API. Also provides method to upload
diff --git a/src/Network/AWS/S3/StreamingUpload.hs b/src/Network/AWS/S3/StreamingUpload.hs
--- a/src/Network/AWS/S3/StreamingUpload.hs
+++ b/src/Network/AWS/S3/StreamingUpload.hs
@@ -75,7 +75,6 @@
 import           Network.HTTP.Client                    (defaultManagerSettings,
                                                          managerConnCount,
                                                          newManager)
-import           Network.HTTP.Client.Internal           (mMaxConns)
 
 type ChunkSize = Int
 type NumThreads = Int
@@ -219,8 +218,7 @@
             let chunkSize' = maybe minimumChunkSize (max minimumChunkSize) mcs
             in if len `div` chunkSize' >= 10000 then len `div` 9999 else chunkSize'
 
-    mgr <- view envManager
-    let mConnCount = mMaxConns mgr
+    let mConnCount = managerConnCount defaultManagerSettings
         nThreads = maybe mConnCount (max 1) mnt
         exec run = if maybe False (> mConnCount) mnt
                 then do