use tidyselect instead of dplyr for where()

pharmaverse · Sep 25, 2023 · ae3304f · ae3304f
1 parent 643452b
commit ae3304f
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/R/read_log_file.R b/R/read_log_file.R
@@ -187,7 +187,7 @@ parse_log <- function(nested_log) {
  into = c("setting", "value"),
  extra = "merge",
  ) %>%
- dplyr::mutate(dplyr::across(dplyr::where(is.character), stringr::str_trim))
+ dplyr::mutate(dplyr::across(tidyselect::where(is.character), stringr::str_trim))
 
  parsed_log$`Session Information`$`Packages` <-
  nested_log$`Session Information`$`Packages` %>%
@@ -219,7 +219,7 @@ parse_log <- function(nested_log) {
  into = c("setting", "value"),
  extra = "merge",
  ) %>%
- dplyr::mutate(dplyr::across(dplyr::where(is.character), stringr::str_trim))
+ dplyr::mutate(dplyr::across(tidyselect::where(is.character), stringr::str_trim))
  }
 
  if ("Masked Functions" %in% names(nested_log)) {