From 6376f0f1c4ae0b40c28af6b65499c94b3307f26e Mon Sep 17 00:00:00 2001 From: Andy Kipp Date: Wed, 30 Oct 2013 16:53:08 -0400 Subject: [PATCH] Set correct method during signature calcuation --- R/http.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/http.R b/R/http.R index f9b17ce..d653878 100644 --- a/R/http.R +++ b/R/http.R @@ -379,7 +379,7 @@ httpWithBody <- function(authInfo, path <- paste(service$path, path, sep="") # get signature headers and append them - sigHeaders <- signatureHeaders(authInfo, "POST", path, file) + sigHeaders <- signatureHeaders(authInfo, method, path, file) headers <- append(headers, sigHeaders) # if we have content then write it to a temp file before posting