diff --git a/tests/testthat/test-chevron_tlg-methods.R b/tests/testthat/test-chevron_tlg-methods.R index 2706144e6..65f825e26 100644 --- a/tests/testthat/test-chevron_tlg-methods.R +++ b/tests/testthat/test-chevron_tlg-methods.R @@ -48,7 +48,7 @@ test_that("run uses the argument passed through the ellipsis in priority", { }) test_that("run works as expected with partial match argument", { - res <- capture_output(tbl <- run(aet02, syn_adv, prune_0 = TRUE, verbose = TRUE, unwrap = FALSE, arm_var = "ARM")) + res <- capture_output(tbl <- run(aet02, syn_adv, prune_0 = TRUE, verbose = TRUE, unwrap = FALSE, arm_var = "ARM")) expect_snapshot(cat(res)) expect_snapshot(cat(export_as_txt(tbl, lpp = 100))) })