tests/testthat/test-https.R

In rbibutils: Read 'Bibtex' Files and Convert Between Bibliography Formats

context("https")

test_that("https is exported, not http", {
    bib <- system.file("bib/Kisung_Rdpack_21.bib", package = "rbibutils")
   bib_Rdpack_21 <- readBib(bib)
   ## bib_Rdpack_21$example - doesn't work;    :TODO: should it work?
   expect_true(grepl("https://arxiv.org/abs/1310.8110", bib_Rdpack_21["example"]$url))
})