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