feat: add warning to pub_covidcast_meta when cache is enabled

Author: dshemetov

R/endpoints.R

@@ -893,6 +893,16 @@ pub_covid_hosp_state_timeseries <- function(
 #' @keywords endpoint
 #' @export
 pub_covidcast_meta <- function(fetch_args = fetch_args_list()) {
+  if (!is.null(cache_environ$use_cache) && cache_environ$use_cache && !fetch_args$ignore_cache) {
+    cli::cli_warn(
+      "epidatr cache is enabled, but it is unlikely you want to use it with the `pub_covidcast_meta` endpoint.
+      use `fetch_args(ignore_cache = TRUE)` to disable the cache for this call.",
+      class = "epidatr__pub_covidcast_meta__ignore_cache",
+      .frequency = "once",
+      .frequency_id = "covidcast_meta_cache"
+    )
+  }
+
   create_epidata_call(
     "covidcast_meta/",
     list(),