Update test expectations

plotly · cpsievert · May 5, 2023 · May 2, 2023 · May 3, 2023 · May 3, 2023
commit 98becaea5b15e7bc73e1819bead82e3ff227e75e
diff --git a/tests/testthat/test-cookbook-axes.R b/tests/testthat/test-cookbook-axes.R
@@ -34,13 +34,13 @@ test_that("factor levels determine tick order", {
 bp.ylim.hide <- bp + ylim(5, 7.5)
 test_that("ylim hides points", {
  info <- expect_warning(expect_traces(bp.ylim.hide, 1, "ylim.hide"), 
-                         regexp = "non-finite values")
+                         regexp = "non-finite")
 })

 bp.scale.hide <- bp + scale_y_continuous(limits = c(5, 7.5))
 test_that("scale_y(limits) hides points", {
  info <- expect_warning(expect_traces(bp.scale.hide, 1, "scale.hide"), 
-                         regexp = "non-finite values")
+                         regexp = "non-finite")
  expect_equivalent(range(info$layout$yaxis$tickvals), c(5, 7.5))
  y <- unlist(lapply(info$data, "[[", "y"))
  expect_true(all(5 <= y & y <= 7.5, na.rm = TRUE))

diff --git a/tests/testthat/test-ggplot-dynamicTicks.R b/tests/testthat/test-ggplot-dynamicTicks.R
@@ -33,7 +33,7 @@ test_that("Categorical axis reflects custom scale mapping", {
    scale_x_discrete(limits = lims)

  expect_warning(p <- ggplotly(g, dynamicTicks = "x"), 
-                 regexp = "non-finite values")
+                 regexp = "non-finite")

  axisActual <- with(
    p$x$layout$xaxis, list(type, tickmode, categoryorder, categoryarray)
@@ -49,7 +49,7 @@ test_that("Categorical axis reflects custom scale mapping", {
    geom_bar() +
    scale_x_discrete(limits = lims, labels = labs)
  expect_warning(p <- ggplotly(g, dynamicTicks = "x"), 
-                 regexp = "non-finite values")
+                 regexp = "non-finite")

  axisActual <- with(
    p$x$layout$xaxis, list(type, tickmode, categoryorder, categoryarray)