"Basic Example" in docs fails when using chunkedFile; works when using hashedFile

[mmport80]

I received an error (below) when running the basic example. Using hashedFile instead works fine.

ServiceError] {
  service    = S3
  status     = 403 Forbidden
  code       = SignatureDoesNotMatch
  message    = Just The request signature we calculated does not match the signature you provided. Check your key and signing method.
  request-id = Just DD9AFEDDAB839A1C
}

[notquiteamonad]

Could this be related to #594?

[endgame]

#547 may have fixed this; need to check.

[ketzacoatl]

@endgame can we add a needs-testing or similar tag to the issues like this that need testing before closing?

[endgame]

I'm calling this fixed because I just uploaded a 2.8GB file using chunkedBody. It used the following sample code:

{-# LANGUAGE DataKinds #-}
{-# LANGUAGE FlexibleContexts #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE ScopedTypeVariables #-}
{-# LANGUAGE TypeApplications #-}

module Main where

import Control.Exception
import Control.Lens
import Control.Monad.IO.Class
import qualified Data.Conduit.Combinators as C
import Data.Generics.Product
import Network.AWS
import Network.AWS.S3
import Network.HTTP.Client
import System.IO

main :: IO ()
main = do
  let r = NorthVirginia
  lgr <- newLogger Trace stdout
  env <- newEnv Discover <&> set (field @"envLogger") lgr . set (field @"envRegion") r
  res <- runResourceT $ do
    body <- chunkedFile defaultChunkSize "/path/to/bigfile.dat"
    send env $ newPutObject "bucketName" "bigfile.dat" body
  print res