#404 take 'mimeType' into account for digests

eblondel · eblondel · commit acba85cda011 · 2025-02-18T15:41:18.000+01:00
diff --git a/inst/actions/geometa_create_iso_19115.R b/inst/actions/geometa_create_iso_19115.R
@@ -867,7 +867,7 @@ function(action, entity, config){
       or$setProtocol(protocol)
       
       if(include_object_identification_ids) if(any(sapply(c("wms", "wfs", "wcs","download"), function(x){startsWith(http_relation$key, x)}))) {
-        resource_id = paste(tolower(entity$identifiers[["id"]]), http_relation$key, tolower(http_relation$name),sep="_")
+        resource_id = paste(tolower(entity$identifiers[["id"]]), http_relation$key, if(!is.null(mimeType)) mimeType else "", tolower(http_relation$name),sep="_")
         or$setAttr("id", create_object_identification_id("onlineresource", resource_id))
       }
       

Original file line number	Diff line number	Diff line change
`@@ -867,7 +867,7 @@ function(action, entity, config){`
`867`	`867`	`or$setProtocol(protocol)`
`868`	`868`
`869`	`869`	`if(include_object_identification_ids) if(any(sapply(c("wms", "wfs", "wcs","download"), function(x){startsWith(http_relation$key, x)}))) {`
`870`		`- resource_id = paste(tolower(entity$identifiers[["id"]]), http_relation$key, tolower(http_relation$name),sep="_")`
	`870`	`+ resource_id = paste(tolower(entity$identifiers[["id"]]), http_relation$key, if(!is.null(mimeType)) mimeType else "", tolower(http_relation$name),sep="_")`
`871`	`871`	`or$setAttr("id", create_object_identification_id("onlineresource", resource_id))`
`872`	`872`	`}`
`873`	`873`