diff --git a/tests/testthat/test_01-inputdata.R b/tests/testthat/test_01-inputdata.R index f3c174b18..d64cc3970 100644 --- a/tests/testthat/test_01-inputdata.R +++ b/tests/testthat/test_01-inputdata.R @@ -11,7 +11,7 @@ test_that("Are all input data files present?", { w <- capture_warnings(updateInputData(cfg = gms::readDefaultConfig("../.."), remindPath = "../..")) # ignore warning about missing historical.mif, raise warning if there were other wargnings ignore <- "File historical.mif seems to be missing!" - if (!w %in% ignore) { + if (length(w) > 0 && !w %in% ignore) { warning(paste0("'updateInputData' raised the following wargnings\n", paste(w, collapse = "\n"))) } gms::model_unlock(lockID)