API now returns a message, not blank, when outside of US...

jhollist · Jun 16, 2023 · d07f14a · d07f14a
1 parent 63f6447
commit d07f14a
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/R/get_elev_point.R b/R/get_elev_point.R
@@ -219,7 +219,9 @@ get_epqs <- function(locations, units = c("meters","feet"),
       return(NA)
     }
 
-    if(httr::status_code(resp) == 200 & httr::content(resp, "text", encoding = "UTF-8") == ""){
+    if(httr::status_code(resp) == 200 & 
+       httr::content(resp, "text", encoding = "UTF-8") == 
+       "Invalid or missing input parameters."){
       message("API returned an empty repsonse (e.g. location in ocean or not in U.S.). NA returned for elevation")
       return(NA)
     } else if(httr::status_code(resp) == 200){