Merge branch 'master' of github.com:r-geoflow/geoflow

eblondel · eblondel · commit 74e25ace8203 · 2025-01-31T12:21:21.000+01:00
diff --git a/inst/actions/atom4R_dataverse_deposit_record.R b/inst/actions/atom4R_dataverse_deposit_record.R
@@ -223,7 +223,7 @@ function(action, entity, config){
       if(length(data_files)>0){
         if(entity$data$upload){
           config$logger.info("Dataverse: uploading data files...")
-          uploaded <- SWORD$addFilesToDataverseRecord(paste0("doi:", doi), files = data_files)
+          uploaded <- mapply(FUN = SWORD$addFilesToDataverseRecord,paste0("doi:", doi),data_files)
         }else{
           config$logger.warn("Dataverse: upload:false, skipping data files upload!")
         }

Original file line number	Diff line number	Diff line change
`@@ -223,7 +223,7 @@ function(action, entity, config){`
`223`	`223`	`if(length(data_files)>0){`
`224`	`224`	`if(entity$data$upload){`
`225`	`225`	`config$logger.info("Dataverse: uploading data files...")`
`226`		`- uploaded <- SWORD$addFilesToDataverseRecord(paste0("doi:", doi), files = data_files)`
	`226`	`+ uploaded <- mapply(FUN = SWORD$addFilesToDataverseRecord,paste0("doi:", doi),data_files)`
`227`	`227`	`}else{`
`228`	`228`	`config$logger.warn("Dataverse: upload:false, skipping data files upload!")`
`229`	`229`	`}`