tests/testthat/test_all_runShinyBMR.R

In tess-st/shinyBMR: A graphical user interface to explore benchmark results and make blackbox methods interpretable.

# FIXME: Add tetsts for runShinyBMR()
# Possibly use shinytest https://github.com/rstudio/shinytest

context("runShinyBMR")

test_that("can run app", {
  expect_message({
    R.utils::evalWithTimeout(runShinyBMR(port = 445566), timeout = 10, onTimeout = "silent")
  }, "Listening on http://127.0.0.1:445566")
})

# test_that("extra args to 'runApp'", {
# })