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

(v1.6.0.9054) unit tests

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends
2021-05-20 15:06:08 +02:00
parent 69a656abc0
commit fecc5d183c
15 changed files with 17 additions and 17 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
inst/tinytest/test-eucast_rules.R
View File

@ -32,7 +32,7 @@ expect_equal(colnames(AMR:::eucast_rules_file),
"reference.version",
"note"))
MOs_mentioned <- unique(AMR:::eucast_rules_file$this_value)
MOs_mentioned <- sort(trimws(unlist(strsplit(MOs_mentioned[!AMR:::is_valid_regex(MOs_mentioned)], ",", fixed = TRUE))))
MOs_mentioned <- sort(AMR:::trimws(unlist(strsplit(MOs_mentioned[!AMR:::is_valid_regex(MOs_mentioned)], ",", fixed = TRUE))))
MOs_test <- suppressWarnings(suppressMessages(mo_name(MOs_mentioned)))
expect_true(length(MOs_mentioned[MOs_test != MOs_mentioned]) == 0)