tests/testthat/test-public-object.R

context("Public object tests")

test_that("basic usage of get_object for anonymous user", {
  ex <- get_object(object = "README.analysis_history", bucket = "1000genomes", key = "", secret = "", region = "us-east-1")
  expect_true(is.raw(ex))
})
zhangxing-love/qingstor-sdk-r documentation built on May 5, 2019, 5:55 p.m.