prevent copy_source parameter being handled a second time for redirected calls

Author: DyfanJones

paws.common/DESCRIPTION

@@ -1,7 +1,7 @@
 Package: paws.common
 Type: Package
 Title: Paws Low-Level Amazon Web Services API
-Version: 0.7.5
+Version: 0.7.6
 Authors@R: c(
         person("David", "Kretch", email = "[email protected]", role = "aut"),
         person("Adam", "Banker", email = "[email protected]", role = "aut"),

paws.common/NEWS.md

@@ -1,3 +1,6 @@
+# paws.common 0.7.6
+* fix `handle_copy_source_param` encoding redirected calls.
+
 # paws.common 0.7.5
 * build endpoint with host_prefix (#804), thanks to @joseale2310 and @lyschoening for raising issue.
 * fix `unix_time` ensure seconds is numeric (#804), thanks to @joseale2310 and @lyschoening for raising issue.

paws.common/R/custom_s3.R

@@ -484,7 +484,8 @@ set_request_url <- function(original_endpoint,
 
 ################################################################################
 handle_copy_source_param <- function(request) {
-  if (!(request$operation$name %in% c("CopyObject", "CopyPart"))) {
+
+  if (!(request$operation$name %in% c("CopyObject", "CopyPart")) | isTRUE(request$context$s3_redirect)) {
     return(request)
   }
   source <- request$params$CopySource