diff --git a/tests/testthat/test-gather.R b/tests/testthat/test-gather.R index 46f5f14e..aea3fc5a 100644 --- a/tests/testthat/test-gather.R +++ b/tests/testthat/test-gather.R @@ -137,7 +137,10 @@ test_that("gather throws error for weird objects", { expect_snapshot(error = TRUE, cnd_class = TRUE, { gather(d, key, val, -x) gather(df, key, val, -y) - }) + }, + # Failing for old versions of R. (<4.3) + transform = function(x) gsub(" in `gather()`", "", x) + ) e <- new.env(parent = emptyenv()) e$x <- 1