We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent a3bc698 commit 06ac3d8Copy full SHA for 06ac3d8
tests/testthat/test-meme.R
@@ -44,8 +44,8 @@ test_that("meme runs as expected", {
44
})
45
46
test_that("meme runs with added font family", {
47
- a <- c("windows", "mac", "linux")
48
- sysname <- tolower(Sys.info()[["sysname"]]) # Skip on Solaris. Skip on Linux if not TRAVIS.
+ a <- c("windows", "linux")
+ sysname <- tolower(Sys.info()[["sysname"]]) # Skip on Solaris, Mac. Skip on Linux if not TRAVIS.
49
skip_if(!sysname %in% a || (sysname == "linux" && !identical(Sys.getenv("TRAVIS"), "true")),
50
"Skipping test on current system.")
51
0 commit comments