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

(v1.1.0.9007) lose dependencies

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends
2020-05-16 21:40:50 +02:00
parent 29609a0e2c
commit f68d71a5e0
44 changed files with 178 additions and 140 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
R/eucast_rules.R
View File

@ -206,7 +206,8 @@ eucast_rules <- function(x,
"\n\nThis may overwrite your existing data if you use e.g.:",
"\ndata <- eucast_rules(data, verbose = TRUE)\n\nDo you want to continue?")
if ("rstudioapi" %in% rownames(utils::installed.packages())) {
q_continue <- rstudioapi::showQuestion("Using verbose = TRUE with eucast_rules()", txt)
showQuestion <- get("showQuestion", envir = asNamespace("rstudioapi"))
q_continue <- showQuestion("Using verbose = TRUE with eucast_rules()", txt)
} else {
q_continue <- utils::menu(choices = c("OK", "Cancel"), graphics = FALSE, title = txt)
}