diff --git a/R/utils.R b/R/utils.R index de08f65..1b9aa9e 100644 --- a/R/utils.R +++ b/R/utils.R @@ -60,6 +60,7 @@ dump_request <- function(staging, url, action, payload) { req <- request(paste0(url, "/new/", basename(actual))) req <- req_method(req, "POST") req <- handle_error(req) + req <- req_options(req, postredir=7) # see https://curl.se/libcurl/c/CURLOPT_POSTREDIR.html. res <- req_perform(req) resp_body_json(res) }