diff --git a/tests/testthat/_snaps/expect-doppelganger/myplot.svg b/tests/testthat/_snaps/expect-doppelganger/myplot.svg
index 1c859e6..0d3968d 100644
--- a/tests/testthat/_snaps/expect-doppelganger/myplot.svg
+++ b/tests/testthat/_snaps/expect-doppelganger/myplot.svg
@@ -27,57 +27,55 @@
-
-
-
-
-
-
-
-
+
+
+
+
+
+
+
+
-
+
-
-
+
+
-
-
+
+
-
-
+
+
-
+
-
-
-
+
+
+
0
-1
-2
-3
-4
+1
+2
+3
-
-
-
+
+
-
-
-
-
-100
-200
-300
-400
+
+
+
+
+100
+200
+300
+400
disp
count
myplot
diff --git a/tests/testthat/test-expect-doppelganger.R b/tests/testthat/test-expect-doppelganger.R
index 36f48f1..f9948bc 100644
--- a/tests/testthat/test-expect-doppelganger.R
+++ b/tests/testthat/test-expect-doppelganger.R
@@ -2,7 +2,7 @@ vdiffr_skip_stale()
test_that("ggplot doppelgangers pass", {
skip_if_not_installed("ggplot2")
- p1_orig <- ggplot2::ggplot(mtcars, ggplot2::aes(disp)) + ggplot2::geom_histogram()
+ p1_orig <- ggplot2::ggplot(mtcars, ggplot2::aes(disp)) + ggplot2::geom_histogram(bins = 30)
expect_doppelganger("myplot", p1_orig)
})
@@ -29,7 +29,7 @@ test_that("grid doppelgangers pass", {
test_that("no 'svglite supports one page' error (#85)", {
test_draw_axis <- function(add_labels = FALSE) {
- theme <- theme_test() + theme(axis.line = element_line(size = 0.5))
+ theme <- theme_test() + theme(axis.line = element_line(linewidth = 0.5))
positions <- c("top", "right", "bottom", "left")
n_breaks <- 3