diff --git a/R/globals.R b/R/globals.R index 51acb22b..e34d774b 100755 --- a/R/globals.R +++ b/R/globals.R @@ -93,6 +93,7 @@ globalVariables(c(".", "shortname", "species", "species_id", + "subspecies", "trade_name", "transmute", "tsn", diff --git a/tests/testthat/test-data.R b/tests/testthat/test-data.R index 291106d5..5e229011 100644 --- a/tests/testthat/test-data.R +++ b/tests/testthat/test-data.R @@ -69,5 +69,6 @@ test_that("creation of data sets is valid", { }) test_that("CoL version info works", { - expect_equal(class(catalogue_of_life_version()), "list") + expect_identical(class(catalogue_of_life_version()), + c("catalogue_of_life_version", "list")) }) diff --git a/tests/testthat/test-mo_history.R b/tests/testthat/test-mo_history.R index a0a6daf3..1cf799e1 100644 --- a/tests/testthat/test-mo_history.R +++ b/tests/testthat/test-mo_history.R @@ -37,7 +37,7 @@ test_that("mo_history works", { force = TRUE), "B_ESCHR_COL") - expect_equal(as.character(suppressWarnings(as.mo("testsubject"))), "B_ESCHR_COL") + expect_equal(as.character(as.mo("testsubject", allow_uncertain = TRUE)), "B_ESCHR_COL") expect_equal(colnames(read_mo_history(force = TRUE)), c("x", "mo", "uncertainty_level", "package_version"))