tests/testthat/test-is_url.R

test_that("is_url works", {
  
    
    path <- "https://github.com/RajLabMSSM/echolocatoR/raw/master/NEWS.md"
    testthat::expect_true(is_url(path=path))

    path <- "://github.com/RajLabMSSM/echolocatoR/raw/master/NEWS.md"    
    testthat::expect_false(is_url(path=path))
})
RajLabMSSM/echodata documentation built on Nov. 21, 2023, 8 a.m.