Update version number label in datapack download and test

mrc-ide · Dec 10, 2024 · 03d3b31 · 03d3b31
1 parent c4fb548
commit 03d3b31
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/R/pepfar-datapack.R b/R/pepfar-datapack.R
@@ -214,7 +214,7 @@ build_datapack_metadata <- function(naomi_output, ids) {
   info <- attr(naomi_output, "info")
   inputs <- read.csv(text = info$inputs.csv, header = FALSE)
 
-  version <- data.frame("Version", utils::packageVersion("naomi"))
+  version <- data.frame("Naomi Version", utils::packageVersion("naomi"))
 
   if (!is.null(ids)) {
     all_data <- list(version, ids, inputs, meta_period)

diff --git a/tests/testthat/test-downloads.R b/tests/testthat/test-downloads.R
@@ -349,5 +349,5 @@ test_that("datapack download can include vmmc data", {
   metadata <- readxl::read_xlsx(out$path, "metadata")
 
   expect_true(nrow(metadata) > 0)
-  expect_equal(as.character(metadata[1, 1]), "Version")
+  expect_equal(as.character(metadata[1, 1]), "Naomi version")
 })