chore(db_joins): Add visible binding to modifyList

ssi-dk · Oct 15, 2024 · e2daf77 · e2daf77
1 parent 6908d7a
commit e2daf77
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/R/db_joins.R b/R/db_joins.R
@@ -228,7 +228,7 @@ join_merger <- function(by, na_by) {
   combined_join <- list(
     "exprs" = c(purrr::pluck(by, "exprs"), purrr::pluck(na_by, "exprs"))
   ) |>
-    modifyList(
+    utils::modifyList(
       purrr::map2(purrr::discard_at(by, "exprs"), purrr::discard_at(na_by, "exprs"), ~ c(.x, .y))
     )
   class(combined_join) <- "dplyr_join_by"
@@ -283,7 +283,7 @@ join_na_sql <- function(x, y, by = NULL, .dots = NULL) {
 
   # Get the translation for matching the na_by component of the join
   subquery_args <- purrr::discard_at(.dots, "na_by") |>
-    modifyList(
+    utils::modifyList(
       list(
         x = x,
         y = y,