Add simple error handling for 404

Should be made more robust
rOpenGov · Nov 28, 2024 · c8004be · c8004be
1 parent 8cb79e5
commit c8004be
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/R/dst_get_data.R b/R/dst_get_data.R
@@ -79,7 +79,10 @@ dst_get_data <- function(table,
   dst_data <- httr::GET(dst_url)
 
   # Make sure the returned status is OK
-  if (httr::status_code(dst_data) != 200) {
+  if (httr::status_code(dst_data) == 404) {
+    stop("The resource you requested have not been found.
+        Please make sure that the table is in `tables`")
+  } else if (httr::status_code(dst_data) != 200) {
     stop(httr::content(dst_data, encoding = "UTF-8")$message)
   }