1
0
mirror of https://github.com/msberends/AMR.git synced 2025-07-08 13:21:50 +02:00

(v1.4.0.9053) unit test old R versions

This commit is contained in:
2020-12-29 21:23:01 +01:00
parent 526f8afb08
commit d3f007bf65
89 changed files with 467 additions and 432 deletions

View File

@ -433,12 +433,11 @@ mo_is_intrinsic_resistant <- function(x, ab, language = get_locale(), ...) {
stop_("length of `x` and `ab` must be equal, or one of them must be of length 1.")
}
# show used version number once per session
if (is.null(getOption("AMR_intrinsic_resistance_note", NULL))) {
# show used version number once
if (message_not_thrown_before("intrinsic_resistant_version")) {
message_("Determining intrinsic resistance based on ",
format_eucast_version_nr(3.2, FALSE), ". ",
font_bold("This note is shown only once per session."))
options(AMR_intrinsic_resistance_note = "shown")
format_eucast_version_nr(3.2, markdown = FALSE), ".")
remember_thrown_message("intrinsic_resistant_version")
}
# runs against internal vector: INTRINSIC_R (see zzz.R)