tests/testthat/test.eGET.R

In agpknitweardesign/festotuAPIs:

context("eGET. Public methods")

basicSanityCheck(
  "findAllListingActive", 
  expectedColumns = etsyReference$ActiveListings.columns
)
basicSanityCheck(
  "findAllShopListingsActive", 
  expectedColumns = etsyReference$ActiveListings.columns,
  shop_id = etsy$shop_id
)

context("eGET. Private methods. Permission scope: transactions_r")

etsyTokens <- list()
etsyTokens$listings_r <- etsy.access_token("listings_r")

basicSanityCheck(
  "findAllShopListingsExpired", 
  accessToken = etsyTokens$listings_r, 
  shop_id = etsy$shop_id
)