From ae3304f9001a7b621a4510a14b8b0e43707900a3 Mon Sep 17 00:00:00 2001
From: Sam Parmar <107635309+parmsam-pfizer@users.noreply.github.com>
Date: Sun, 24 Sep 2023 23:37:28 -0400
Subject: [PATCH] use tidyselect instead of dplyr for `where()`

---
 R/read_log_file.R | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/R/read_log_file.R b/R/read_log_file.R
index 4bb524d..a7c1c4d 100644
--- 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)) {