Optionally skip test requiring maptools (#6444)

MichaelChirico · web-flow · commit 295f5cbf8856 · 2025-04-30T19:54:56.000+02:00
diff --git a/tests/testthat/test-coord-map.R b/tests/testthat/test-coord-map.R
@@ -52,6 +52,7 @@ test_that("coord map throws error when limits are badly specified", {
 })
 
 test_that("coord_map throws informative warning about guides", {
+  skip_if_not_installed("mapproj")
   expect_snapshot_warning(
    ggplot_build(ggplot() + coord_map() + guides(x = guide_axis()))
   )

Original file line number	Diff line number	Diff line change
`@@ -52,6 +52,7 @@ test_that("coord map throws error when limits are badly specified", {`
`52`	`52`	`})`
`53`	`53`
`54`	`54`	`test_that("coord_map throws informative warning about guides", {`
	`55`	`+ skip_if_not_installed("mapproj")`
`55`	`56`	`expect_snapshot_warning(`
`56`	`57`	`ggplot_build(ggplot() + coord_map() + guides(x = guide_axis()))`
`57`	`58`	`)`