diff --git a/R/ISSR800.R b/R/ISSR800.R
index 1bf72af1..cf4b0e1e 100644
--- a/R/ISSR800.R
+++ b/R/ISSR800.R
@@ -161,10 +161,10 @@ ISSR800.wcs <- function(aoi, var, res = 800, quiet = FALSE) {
   if (!is.null(var.spec$rat)) {
     
     # get rat
-    rat <- try(read.csv(var.spec$rat, stringsAsFactors = FALSE), silent = quiet)
+    rat <- try(suppressWarnings(read.csv(var.spec$rat, stringsAsFactors = FALSE)), silent = TRUE)
     
     if (inherits(rat, 'try-error')) {
-      message("Failed to download RAT from ", var.spec$rat, "; returning non-categorical grid")
+      message("\nFailed to download RAT from ", var.spec$rat, "; returning integer grid")
       return(r)
     }