col_exists() only fails and never errors for missing column selection

rstudio · Oct 23, 2023 · 3461c33 · 3461c33
1 parent 8ec5486
commit 3461c33
Showing 1 changed file with 5 additions and 1 deletion.
diff --git a/R/col_exists.R b/R/col_exists.R
@@ -241,7 +241,11 @@ col_exists <- function(
   }
 
   # Resolve the columns based on the expression
-  columns <- resolve_columns(x = x, var_expr = columns, preconditions = NULL)
+  ## Only for `col_exists()`: error gracefully if column not found
+  columns <- tryCatch(
+    expr = resolve_columns(x = x, var_expr = columns, preconditions = NULL),
+    error = function(cnd) cnd$i %||% NA_character_
+  )
 
   if (is_a_table_object(x)) {