actually pass the call

tidymodels · Dec 16, 2024 · 425d6cd · 425d6cd
1 parent 644531a
commit 425d6cd
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 2 deletions.
diff --git a/R/grids.R b/R/grids.R
@@ -260,7 +260,8 @@ make_random_grid <- function(...,
 new_param_grid <- function(x = new_data_frame(), call = caller_env()) {
   if (!is.data.frame(x)) {
     cli::cli_abort(
-      "{.arg x} must be a data frame to construct a new grid from."
+      "{.arg x} must be a data frame to construct a new grid from.",
+      call = call
     )
   }
 

diff --git a/tests/testthat/_snaps/grids.md b/tests/testthat/_snaps/grids.md
@@ -106,6 +106,6 @@
     Code
       new_param_grid(as.matrix(x))
     Condition
-      Error in `new_param_grid()`:
+      Error:
       ! `x` must be a data frame to construct a new grid from.