tests/testthat/test-GrantQualification.R

In pyMTurkR: A Client for the 'MTurk' Requester API

test_that("GrantQualification", {
  skip_if_not(CheckAWSKeys())
  skip_if(nrow(try(GetQualificationRequests(), TRUE)) == 0)

  GetQualificationRequests() -> requests
  GrantQualification(requests$QualificationRequestId[[1]], 1) -> result
  expect_type(result, "list")
  RevokeQualification(requests$QualificationTypeId[[1]], workers = requests$WorkerId[[1]])

})