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

(v2.1.1.9139) unit test

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends
2025-02-01 11:10:42 +01:00
parent 6a206bed12
commit d84033bbcb
9 changed files with 7 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@ -141,12 +141,7 @@ call_functions <- c(
import_functions <- c(import_functions, call_functions)
if (AMR:::pkg_is_available("desc")) {
suggests <- desc::desc(".")$get_deps()
suggests <- suggests[which(suggests$type == "Suggests"), ]$package
} else {
suggests <- import_functions
}
suggests <- strsplit(utils::packageDescription(pkg = ".", lib.loc = ".", fields = "Suggests"), "[,\n ]+")[[1]]
for (i in seq_len(length(import_functions))) {
fn <- names(import_functions)[i]
pkg <- unname(import_functions[i])