Remove local_error_call() dispatch snapshot test

Picking up the local marker across the dispatch boundary will no longer work in future versions of R
r-lib · Oct 26, 2023 · 6001975 · 6001975
1 parent e22849a
commit 6001975
Show file tree

Hide file tree

Showing 2 changed files with 0 additions and 24 deletions.
diff --git a/tests/testthat/_snaps/cnd-abort.md b/tests/testthat/_snaps/cnd-abort.md
@@ -1467,12 +1467,6 @@
       <error/rlang_error>
       Error in `f3()`:
       ! foo
-    Code
-      err(f4(NULL))
-    Output
-      <error/rlang_error>
-      Error in `f4()`:
-      ! foo
 
 # errors are fully displayed (parents, calls) in knitted files
 

diff --git a/tests/testthat/test-cnd-abort.R b/tests/testthat/test-cnd-abort.R
@@ -528,28 +528,10 @@ test_that("generic call is picked up in methods", {
     g()
   }
 
-  f4 <- function(x) {
-    f4_dispatch(x)
-  }
-  f4_dispatch <- function(x) {
-    local_error_call("caller")
-    UseMethod("f4")
-  }
-  f4.foo <- function(x) {
-    NextMethod()
-  }
-  f4.bar <- function(x) {
-    NextMethod()
-  }
-  f4.default <- function(x) {
-    g()
-  }
-
   expect_snapshot({
     err(f1())
     err(f2())
     err(f3())
-    err(f4(NULL))
   })
 })