diff --git a/R/ard_vif.R b/R/ard_vif.R index 190fd37e5..31e1a2b55 100644 --- a/R/ard_vif.R +++ b/R/ard_vif.R @@ -31,11 +31,13 @@ ard_vif <- function(x, ...) { tryCatch( varnames <- attr(stats::terms(x), "term.labels"), error = function(e) { - cli::cli_abort(c( - "There was an error running {.fun car::vif}. See below.", - x = vif[["error"]] - ), - call = env_parent(n = 3L)) + cli::cli_abort( + c( + "There was an error running {.fun car::vif}. See below.", + x = vif[["error"]] + ), + call = env_parent(n = 3L) + ) } ), VIF = list(NULL), diff --git a/tests/testthat/test-ard_vif.R b/tests/testthat/test-ard_vif.R index b2b153cdd..b0201d7b8 100644 --- a/tests/testthat/test-ard_vif.R +++ b/tests/testthat/test-ard_vif.R @@ -35,4 +35,3 @@ test_that("ard_vif() issues friendly messaging for incorrect object passed in/ca cards::ADSL |> ard_vif() ) }) -