diff --git a/src/Network/Minio/Sign/V4.hs b/src/Network/Minio/Sign/V4.hs
index a8dc944..dde80f0 100644
--- a/src/Network/Minio/Sign/V4.hs
+++ b/src/Network/Minio/Sign/V4.hs
@@ -200,8 +200,8 @@ credentialScope sp =
   let region = fromMaybe "" $ spRegion sp
    in B.intercalate
         "/"
-        [ TE.encodeUtf8 $ Time.formatTime Time.defaultTimeLocale "%Y%m%d" $ spTimeStamp sp,
-          TE.encodeUtf8 region,
+        [ encodeUtf8 $ Time.formatTime Time.defaultTimeLocale "%Y%m%d" $ spTimeStamp sp,
+          encodeUtf8 region,
           toByteString $ spService sp,
           "aws4_request"
         ]