add missing sandbox param for setLicense

eblondel · Jun 5, 2024 · 4dc27ca · 4dc27ca
1 parent a5642d8
commit 4dc27ca
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 1 deletion.
diff --git a/R/ZenodoRecord.R b/R/ZenodoRecord.R
@@ -742,8 +742,9 @@ ZenodoRecord <-  R6Class("ZenodoRecord",
     #'    fetched with the \code{ZenodoManager} and the function \code{$getLicenses()}.
     #' @param licenseId a license Id
     #' @param sandbox Use the Zenodo sandbox infrastructure as basis to control available licenses. Default is \code{FALSE}
+    #' @return \code{TRUE} if set, \code{FALSE} otherwise
     setLicense = function(licenseId, sandbox = FALSE){
-      self$addRight(id = licenseId)
+      self$addRight(id = licenseId, sandbox = sandbox)
     },
 
     #' @description Set record version.

diff --git a/man/ZenodoRecord.Rd b/man/ZenodoRecord.Rd