fix #366

r-geoflow · Oct 5, 2023 · 195ae13 · 195ae13
1 parent 25a403a
commit 195ae13
Showing 1 changed file with 16 additions and 12 deletions.
diff --git a/inst/actions/geonapi_publish_iso_19139.R b/inst/actions/geonapi_publish_iso_19139.R
@@ -122,20 +122,24 @@ function(action, entity, config){
       #publication
       mdId = doPublish(metaFile, geometa_inspire)
       if(create_doi_on_datacite){
-        config$logger.info("Creating DOI on DataCite...")
-        config$logger.info("Checking DOI registration pre-conditions...")
-        checked = GN$doiCheckPreConditions(mdId)
-        if(checked){
-          config$logger.info("DOI registration pre-conditions are met, proceed with DOI registration")
-          created = GN$createDOI(mdId)
-          if(created){
-            doi_report = attr(created, "report")
-            doi = doi_report$doi
-            entity$identifiers$doi = doi
-            config$logger.info(sprintf("DOI '%s' successfuly created for metadata '%s'", doi, mdId))
+        if(is.null(entity$identifiers[["doi"]])){
+          config$logger.info("Creating DOI on DataCite...")
+          config$logger.info("Checking DOI registration pre-conditions...")
+          checked = GN$doiCheckPreConditions(mdId)
+          if(checked){
+            config$logger.info("DOI registration pre-conditions are met, proceed with DOI registration")
+            created = GN$createDOI(mdId)
+            if(created){
+              doi_report = attr(created, "report")
+              doi = doi_report$doi
+              entity$identifiers$doi = doi
+              config$logger.info(sprintf("DOI '%s' successfuly created for metadata '%s'", doi, mdId))
+            }
+          }else{
+            config$logger.warn("Aborting DOI creation, pre-conditions are not met!")
           }
         }else{
-          config$logger.warn("Aborting DOI creation, pre-conditions are not met!")
+          config$logger.warn("A DOI is already declared as entity identifier, skip DOI creation on DataCite")
         }
       }