Merge pull request #199 from mrc-ide/fix-dependency-environment

Support `environment:` from an interactive session.
mrc-ide · Nov 15, 2024 · fb87926 · fb87926
2 parents 9eebaad + 8f69baa
commit fb87926
Show file tree

Hide file tree

Showing 3 changed files with 5 additions and 2 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,6 +1,6 @@
 Package: orderly2
 Title: Orderly Next Generation
-Version: 1.99.55
+Version: 1.99.56
 Authors@R: c(person("Rich", "FitzJohn", role = c("aut", "cre"),
                     email = "[email protected]"),
              person("Robert", "Ashton", role = "aut"),

diff --git a/R/outpack_helpers.R b/R/outpack_helpers.R
@@ -113,6 +113,7 @@ orderly_copy_files <- function(expr, files, dest, overwrite = TRUE,
                          location = options$location,
                          allow_remote = options$allow_remote,
                          fetch_metadata = options$fetch_metadata,
+                         envir = envir,
                          root = root)
     if (length(id) > 1) {
       cli::cli_abort(

diff --git a/tests/testthat/examples/depends-query/depends-query.R b/tests/testthat/examples/depends-query/depends-query.R
@@ -1,9 +1,11 @@
 orderly2::orderly_parameters(a = NULL, b = NULL, c = NULL)
+
+value <- c
 orderly2::orderly_dependency(
   "parameters",
   paste("latest(parameter:a == this:a &&",
         "parameter:b == this:b &&",
-        "parameter:c == this:c)"),
+        "parameter:c == environment:value)"),
   c(input.rds = "data.rds"))
 orderly2::orderly_artefact("result.rds", description = "Processed data")
 d <- readRDS("input.rds")