diff --git a/R/write_eml.R b/R/write_eml.R index c00dc296..bc078ceb 100644 --- a/R/write_eml.R +++ b/R/write_eml.R @@ -211,6 +211,10 @@ write_eml <- function(x, directory, derived_paragraph = TRUE) { eml$additionalMetadata$metadata$gbif$bibliography$citation <- x$bibliographicCitation + # Set bibliography (can be NULL) + references <- as.list(x$references) %>% rlang::set_names("citation") + eml$additionalMetadata$metadata$gbif$bibliography <- references + # Set external link = project URL (can be NULL) project_url <- x$project$path if (!is.null(project_url)) {