Added hoardr mkdir() call to make sure cache path exists.

ropensci · May 15, 2020 · bea7c9a · bea7c9a
1 parent 624d126
commit bea7c9a
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/R/ghcnd.R b/R/ghcnd.R
@@ -311,6 +311,7 @@ get_stations <- function(refresh = FALSE, ...) {
   } else {
     if (file.exists(ff)) unlink(ff)
     if (file.exists(ffrds)) unlink(ffrds)
+    ghcnd_cache$mkdir()
     res <- GET_retry(
       "ftp://ftp.ncdc.noaa.gov/pub/data/ghcn/daily/ghcnd-stations.txt",
       disk = ff, ...)