fix #60

eblondel · Oct 12, 2021 · 96cf8a3 · 96cf8a3
1 parent bd31131
commit 96cf8a3
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/ZenodoManager.R b/R/ZenodoManager.R
@@ -899,7 +899,7 @@ ZenodoManager <-  R6Class("ZenodoManager",
       if(!is.null(record)) recordId <- record$id
       fileparts <- strsplit(path,"/")
       filename <- unlist(fileparts)[length(fileparts)]
-      method <- ifelse(newapi, "PUT", "POST")
+      method <- if(newapi) "PUT" else "POST"
       if(!"bucket" %in% names(record$links)){
         self$WARN(sprintf("No bucket link for record id = %s. Revert to old file upload API", recordId))
         newapi <- FALSE