use utils::removeSource instead of rlang::zap_srcref

RConsortium · Nov 5, 2024 · 00fecec · 00fecec
1 parent f2d1668
commit 00fecec
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/tests/testthat/test-method-dispatch.R b/tests/testthat/test-method-dispatch.R
@@ -233,7 +233,7 @@ test_that("errors from dispatched methods have reasonable tracebacks", {
     x <- sys.calls()
     x <- x[-length(x)] # remove get_call_stack()
     x <- tail(x, n)
-    lapply(x, rlang::zap_srcref)
+    lapply(x, utils::removeSource)
   }
 
   my_generic <- new_generic("my_generic", "x")