P281424/AMR
1
0
Fork 0
mirror of https://github.com/msberends/AMR.git synced 2025-07-10 01:02:47 +02:00
Code Releases Activity

(v1.4.0.9060) ab class selector fix

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends
2021-01-04 13:39:06 +01:00
parent c9de74c81a
commit 8d117820b8
15 changed files with 20 additions and 19 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
tests/testthat/test-zzz.R
View File

@ -105,12 +105,13 @@ test_that("imports work", {
import_functions <- c(import_functions, call_functions)
# check if all are in Suggests field
expect_true(all(unique(import_functions) %in% strsplit(packageDescription("AMR")$Suggests, ",\n")[[1]]))
for (i in seq_len(length(import_functions))) {
fn <- names(import_functions)[i]
pkg <- unname(import_functions[i])
# package should be in Suggests field of DESCRIPTION
expect(pkg %in% strsplit(packageDescription("AMR")$Suggests, ",\n")[[1]],
failure_message = paste0("Package ", pkg, " is not in Suggests field"))
# function should exist in foreign pkg namespace
expect(!is.null(import_fn(name = fn, pkg = pkg, error_on_fail = FALSE)),
failure_message = paste0("Function ", pkg, "::", fn, "() does not exist anymore"))
}