Set correct method during signature calcuation

ialyabiev · Oct 30, 2013 · 6376f0f · 6376f0f
1 parent 72a0937
commit 6376f0f
Showing 1 changed file with 1 addition and 1 deletion.
diff --git 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