fix hoverinfo test expectation

cpsievert · cpsievert · commit 9991c2eb307f · 2018-10-31T13:05:29.000-05:00
diff --git a/tests/testthat/test-ggplot-sf.R b/tests/testthat/test-ggplot-sf.R
@@ -54,7 +54,7 @@ test_that("geom_sf() polygons with fill/text.", {
   # one trace for every fillcolor, one for graticule, one for colorbar
   expect_length(l$data, length(unique(nc$AREA)) + 2)
   expect_true(
-    all(unlist(lapply(l$data, "[[", "hoverinfo")) %in% c("none", "text"))
+    all(unlist(lapply(l$data, "[[", "hoverinfo")) %in% c("skip", "none", "text"))
   )
   # graticule styling should inherit from panel.grid.major
   expect_equivalent(

Original file line number	Diff line number	Diff line change
`@@ -54,7 +54,7 @@ test_that("geom_sf() polygons with fill/text.", {`
`54`	`54`	`# one trace for every fillcolor, one for graticule, one for colorbar`
`55`	`55`	`expect_length(l$data, length(unique(nc$AREA)) + 2)`
`56`	`56`	`expect_true(`
`57`		`- all(unlist(lapply(l$data, "[[", "hoverinfo")) %in% c("none", "text"))`
	`57`	`+ all(unlist(lapply(l$data, "[[", "hoverinfo")) %in% c("skip", "none", "text"))`
`58`	`58`	`)`
`59`	`59`	`# graticule styling should inherit from panel.grid.major`
`60`	`60`	`expect_equivalent(`