fix zenodo hyperlinks

nuest · nuest · commit 4ac2111447bd · 2025-02-20T21:53:45.000+01:00
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,6 +1,6 @@
 Package: codecheck
 Title: Helper Functions for CODECHECK Project
-Version: 0.13.0
+Version: 0.13.1
 Authors@R: 
     c(person(given = "Stephen",
             family = "Eglen",
diff --git a/R/utils_render_cert_md.R b/R/utils_render_cert_md.R
@@ -22,6 +22,10 @@ add_repository_hyperlink <- function(md_content, repo_link) {
         repo_link <- paste0(CONFIG$HYPERLINKS[["gitlab"]], spec[["repo"]])
         paste0("[", spec[["repo"]], "](", repo_link, ")")
       },
+      "zenodo" = {
+        repo_link <- paste0(CONFIG$HYPERLINKS[["zenodo"]], spec[["repo"]])
+        paste0("[", spec[["repo"]], "](", repo_link, ")")
+      },
 
       # Type is none of the above
       {
diff --git a/R/utils_render_register_json.R b/R/utils_render_register_json.R
@@ -14,6 +14,8 @@ add_repository_links_json <- function(register_table) {
         paste0(CONFIG$HYPERLINKS[["osf"]], spec[["repo"]])
       } else if (spec[["type"]] == "gitlab") {
         paste0(CONFIG$HYPERLINKS[["gitlab"]], spec[["repo"]])
+      } else if (spec[["type"]] == "zenodo") {
+        paste0(CONFIG$HYPERLINKS[["zenodo"]], spec[["repo"]])
       } else {
         repository
       }
diff --git a/inst/extdata/config.R b/inst/extdata/config.R
@@ -83,7 +83,8 @@ CONFIG$HYPERLINKS <- list(
   codecheck_issue = "https://github.com/codecheckers/register/issues/",
   zenodo_deposit = "https://zenodo.org/deposit/",
   CrossRef = "https://www.crossref.org",
-  OpenAlex = "https://openalex.org"
+  OpenAlex = "https://openalex.org",
+  zenodo = "https://zenodo.org/records/"
 )
 
 # Plural of venue subcategories 

Original file line number	Diff line number	Diff line change
`@@ -14,6 +14,8 @@ add_repository_links_json <- function(register_table) {`
`14`	`14`	`paste0(CONFIG$HYPERLINKS[["osf"]], spec[["repo"]])`
`15`	`15`	`} else if (spec[["type"]] == "gitlab") {`
`16`	`16`	`paste0(CONFIG$HYPERLINKS[["gitlab"]], spec[["repo"]])`
	`17`	`+ } else if (spec[["type"]] == "zenodo") {`
	`18`	`+ paste0(CONFIG$HYPERLINKS[["zenodo"]], spec[["repo"]])`
`17`	`19`	`} else {`
`18`	`20`	`repository`
`19`	`21`	`}`
Original file line number	Diff line number	Diff line change
`@@ -83,7 +83,8 @@ CONFIG$HYPERLINKS <- list(`
`83`	`83`	`codecheck_issue = "https://github.com/codecheckers/register/issues/",`
`84`	`84`	`zenodo_deposit = "https://zenodo.org/deposit/",`
`85`	`85`	`CrossRef = "https://www.crossref.org",`
`86`		`- OpenAlex = "https://openalex.org"`
	`86`	`+ OpenAlex = "https://openalex.org",`
	`87`	`+ zenodo = "https://zenodo.org/records/"`
`87`	`88`	`)`
`88`	`89`
`89`	`90`	`# Plural of venue subcategories`