tests/testthat/test-onload.R

In RAthena: Connect to 'AWS Athena' using 'Boto3' ('DBI' Interface)

test_that("test if dbplyr major and minor versions are collected correctly", {
  skip_if_no_env()
  skip_if_package_not_avialable("dbplyr")
  
  library(dbplyr)
  
  dbplyr_major = packageVersion("dbplyr")$major
  dbplyr_minor = packageVersion("dbplyr")$minor
  
  RAthena:::dbplyr_version()
  
  expect_equal(RAthena:::dbplyr_env$major, dbplyr_major)
  expect_equal(RAthena:::dbplyr_env$minor, dbplyr_minor)
})