tests/testthat/test-is_url_valid.R

In tzina97/netMHCpanW: Interface to 'NetMHCpan'

test_that("use", {
  expect_silent(is_url_valid())
})

test_that("be verbose", {
  if (!is_on_travis())

  expect_message(
    is_url_valid(
      netmhcpan_bin_url = "invalid",
      verbose = TRUE
    ),
    "netmhcpan_bin_url"
  )
})