diff --git a/R/utils.R b/R/utils.R index 6a0ef39..568c54f 100644 --- a/R/utils.R +++ b/R/utils.R @@ -63,7 +63,7 @@ make_get_request <- function(token, path, params = list(), instance = NULL, anon status_code <- httr::status_code(request_results) if (!status_code %in% c(200, 429)) { - stop(paste("something went wrong. Status code:", status_code), call. = FALSE) + stop(paste("Unable to make the request. Status Code: ", status_code), call. = FALSE) } else if (status_code == 429) { message("too many requests. Sleeping for 5 minutes") Sys.sleep(60 * 5)