tests/testthat/test_read_metadata_checksum.R

context("Read metadata checksum")

# testthat::test_that("read_metadata_checksum() works", {
#   vcr::use_cassette("read_metadata_checksum", {
#     res <- read_metadata_checksum("knb-lter-ntl.409.1")
#   })
#   expect_equal(class(res), "character")
#   expect_true(length(res) > 0)
# })
ropensci/EDIutils documentation built on Oct. 19, 2023, 7:21 p.m.