ensure list2() can be found

tidyverse · Oct 21, 2024 · e6db72d · e6db72d
1 parent d488de8
commit e6db72d
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/R/boilerplates.R b/R/boilerplates.R
@@ -118,5 +118,8 @@ boilerplate.Geom <- function(x, ..., checks = NULL, env = caller_env()) {
     body <- call2("{", !!!checks, body)
   }
 
-  new_function(fmls, body, env = caller_env())
+  # We encapsulate rlang::list2
+  new_env <- new_environment(list(list2 = list2), env)
+
+  new_function(fmls, body, env = new_env)
 }