Gemini: Correct handling of error branch

FALSE || integer() gives NA; grep() was never right to use.

I'm not sure if res could ever have length()>1, but doesn't hurt

Author: MichaelChirico

.github/workflows/R-CMD-check-occasional.yaml

@@ -142,7 +142,7 @@ jobs:
             dt_tar = list.files(pattern = "^data[.]table_.*[.]tar[.]gz$")
             if (!length(dt_tar)) stop("Built tar.gz not found among: ", toString(list.files()))
             res = system2(Rbin, c("CMD", "check", dt_tar[1L], check_args), stdout=TRUE, stderr=TRUE, env=sprintf("%s=%s", names(env), env))
-            if (!is.null(attr(res, "status")) || is.na(res) || grep("^Status:.*(ERROR|WARNING)", res)) {
+            if (!is.null(attr(res, "status")) || anyNA(res) || any(grepl("^Status:.*(ERROR|WARNING)", res))) {
               writeLines(as.character(res))
               stop("R CMD check failed")
             }