From 4319d10895a9041afc3c6fc31d473d9e35e3d3c8 Mon Sep 17 00:00:00 2001
From: eblondel <emmanuel.blondel1@gmail.com>
Date: Tue, 17 Oct 2023 00:46:46 +0200
Subject: [PATCH] support #133

---
 R/ZenodoManager.R | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/R/ZenodoManager.R b/R/ZenodoManager.R
index 543c3c4..de382c1 100644
--- a/R/ZenodoManager.R
+++ b/R/ZenodoManager.R
@@ -756,8 +756,8 @@ ZenodoManager <-  R6Class("ZenodoManager",
     depositRecord = function(record, publish = FALSE){
       data <- record
       type <- ifelse(is.null(record$id), "POST", "PUT")
-      request <- ifelse(is.null(record$id), "deposit/depositions", 
-                        sprintf("deposit/depositions/%s", record$id))
+      request <- ifelse(is.null(record$id), "records", 
+                        sprintf("records/%s/draft", record$id))
       zenReq <- ZenodoRequest$new(private$url, type, request, data = data,
                                   token = self$getToken(), 
                                   logger = self$loggerType)