Skip to content

Commit

Permalink
it was ggplot2 of course
Browse files Browse the repository at this point in the history
  • Loading branch information
victor-navarro committed Apr 7, 2024
1 parent 19ea729 commit 0496571
Showing 1 changed file with 2 additions and 4 deletions.
6 changes: 2 additions & 4 deletions tests/testthat/test-global_options.R
Original file line number Diff line number Diff line change
Expand Up @@ -14,11 +14,9 @@ test_that(".calmr_scales returns a ggplot scale", {

test_that("set_calmr_palette has an effect on .calmr_scales", {
on.exit(options("calmr_palette" = NULL))
my_scale <- .calmr_scales("colour_d")
expect_equal(my_scale$scale_name, "viridis_d")
expect_true(inherits(.calmr_scales("colour_d"), "gg"))
set_calmr_palette("hue")
my_new_scale <- .calmr_scales("colour_d")
expect_equal(my_new_scale$scale_name, "hue")
expect_true(inherits(.calmr_scales("colour_d"), "gg"))
})

test_that("set_calmr_palette throws error with weird palette", {
Expand Down

0 comments on commit 0496571

Please sign in to comment.