tests/testthat/test-crossref.R

# tests for crossref deprecated fxn in rplos
context("crossref")

test_that("crossref responds correctly", {
  skip_on_cran()
  
  mssg <- "Crossref functionality moved to package rcrossref"
  expect_error(crossref(), mssg, class="error")
  expect_error(crossref(a = 5), mssg, class="error")
})

Try the rplos package in your browser

Any scripts or data that you put into this service are public.

rplos documentation built on Feb. 24, 2021, 1:06 a.m.