Revert no longer needed change

r-lib · Jun 14, 2024 · d4c4378 · d4c4378
1 parent e5f28a8
commit d4c4378
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/tests/testthat/test-graphics.R b/tests/testthat/test-graphics.R
@@ -144,7 +144,7 @@ test_that("existing plots will not leak into evaluate()", {
   dev.control('enable')
   d <- dev.cur()
   plot(1, 1)
-  ev <- evaluate(c('pdf(NULL)', 'dev.off()', 'plot.new()', 'plot(1:10, 1:10)'))
+  ev <- evaluate(c('dev.new()', 'dev.off()', 'plot.new()', 'plot(1:10, 1:10)'))
   dev.off(d)
   expect_equal(tail(classes(ev), 6), c('source', 'character', 'recordedplot')[c(1, 2, 1, 3, 1, 3)])
 })