Merge pull request #22 from GregePorter/add-warning-to-createhit

Add warning to CreateHIT.R
cloudyr · Mar 14, 2024 · ce4fd38 · ce4fd38
2 parents 42cf4fd + 7d9b9c4
commit ce4fd38
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/R/CreateHIT.R b/R/CreateHIT.R
@@ -302,6 +302,7 @@ CreateHIT <-
  # Validity check
  if(class(response) == "try-error") {
  warning("Invalid Request")
+ warning(response)
  } else {
  HITs <- emptydf(1, 3, c("HITTypeId", "HITId", "Valid"))
  HITs$HITTypeId <- response$HIT$HITTypeId