From cf31de761a209a71a059e396faf2cc8728add640 Mon Sep 17 00:00:00 2001
From: Hadley Wickham <h.wickham@gmail.com>
Date: Wed, 21 Feb 2024 12:24:07 -0600
Subject: [PATCH] Forward compatibility with dbplyr 2.5.0

I don't _think_ there should be any other problems, but if you could run your tests with dev dbplyr installed, I'd certainly appreciate it.
---
 R/cte.R | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/R/cte.R b/R/cte.R
index 8f23ac4..c87c1d7 100644
--- a/R/cte.R
+++ b/R/cte.R
@@ -15,7 +15,9 @@ get_tables_from_sql.lazy_select_query <- function(query) {
 
 #' @export
 get_tables_from_sql.lazy_base_remote_query <- function(query) {
-  if (inherits(query$x, "dbplyr_table_ident")) {
+  if (inherits(query$x, "dbplyr_table_path")) { # dbplyr >= 2.5.0
+    utils::getFromNamespace("table_path_name", "dbplyr")(query$x)
+  } else if (inherits(query$x, "dbplyr_table_ident")) { # dbplyr >= 2.4.0
     vctrs::field(query$x, "table")
   } else {
     as.character(query$x)