diff --git a/tests/testthat/test-method-dispatch.R b/tests/testthat/test-method-dispatch.R index 69acb9ac..548917b4 100644 --- a/tests/testthat/test-method-dispatch.R +++ b/tests/testthat/test-method-dispatch.R @@ -230,14 +230,9 @@ test_that("method dispatch works for class_missing", { test_that("errors from dispatched methods have reasonable tracebacks", { my_generic <- new_generic("my_generic", "x") method(my_generic, class_numeric) <- function(x) tail(sys.calls(), 3) - expect_snapshot({ - my_generic(10) - }) + expect_snapshot(my_generic(10)) my_generic <- new_generic("my_generic", c("x", "y")) method(my_generic, list(class_numeric, class_numeric)) <- function(x, y) tail(sys.calls(), 3) - - expect_snapshot({ - my_generic(3, 4) - }) + expect_snapshot(my_generic(3, 4)) })