docs: handle empty licen[cs]e field

CCBR · Nov 2, 2023 · ed7e62b · ed7e62b
1 parent f6ea4dc
commit ed7e62b
Showing 1 changed file with 4 additions and 2 deletions.
diff --git a/docs/templates/modules.qmd b/docs/templates/modules.qmd
@@ -56,7 +56,7 @@ code_symbol <- '{{< fa regular file-code >}}'
 
 if ('tools' %in% names(meta)) {
     tools_df <- meta$tools %>% yaml_to_df()
-    for (colname in c('tool_dev_url', 'homepage', 'documentation')) {
+    for (colname in c('tool_dev_url', 'homepage', 'documentation', 'licence')) {
         if (!(colname %in% colnames(tools_df))) {
             tools_df[colname] <- NA_character_
         }
@@ -69,7 +69,9 @@ if ('tools' %in% names(meta)) {
                               TRUE ~ ""),
              code = case_when(!is.na(tool_dev_url) ~ glue("[{ code_symbol } Code]({ tool_dev_url })"),
                               TRUE ~ ""),
-             links = paste(home, docs, code, glue("`{ licence }`"),
+             license = case_when(!is.na(licence) ~ glue("`{ licence }`"),
+                                 TRUE ~ "")
+             links = paste(home, docs, code, license,
                            sep = " &ensp; "),
              markdown = glue("{ name }", "{ links }", "{ description }",
                              .sep = '\n\n')