quiet down unnecessary messages

ncss-tech · Sep 6, 2024 · a50d86e · a50d86e
1 parent a8ed592
commit a50d86e
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/R/seriesExtent.R b/R/seriesExtent.R
@@ -109,11 +109,11 @@ seriesExtent <- function(s, type = c('vector', 'raster'), timeout = 60,
   tf <- tempfile(fileext = '.tif')
 
   # download GeoTiff file
-  res <- try(curl::curl_download(url = u, destfile = tf, quiet = TRUE, handle = ch))
+  res <- try(curl::curl_download(url = u, destfile = tf, quiet = TRUE, handle = ch), silent = TRUE)
 
   # trap errors
   if (inherits(res, 'try-error')) {
-    message(res[1])
+    # message(res[1])
     message('no data returned')
     return(NULL)
   }