in skeleton generator wrap any() around grepl() to suppress warning

Author: eddelbuettel

ChangeLog

@@ -1,3 +1,7 @@
+2021-01-02  Dirk Eddelbuettel  <[email protected]>
+
+	* R/RcppEigen.package.skeleton.R: Wrap any() around grepl()
+
 2020-12-25  Dirk Eddelbuettel  <[email protected]>
 
 	* .github/workflows/ci.yaml: Small tweaks to CI YAML file

R/RcppEigen.package.skeleton.R

@@ -79,7 +79,7 @@ RcppEigen.package.skeleton <- function(name= "anRpackage", list = character(),
     ## add a useDynLib to NAMESPACE,
     NAMESPACE <- file.path(root, "NAMESPACE")
     lines <- readLines(NAMESPACE)
-    if (! grepl("useDynLib", lines)) {
+    if (!any(grepl("useDynLib", lines))) {
         lines <- c(sprintf("useDynLib(%s)", name),
                    "import(RcppEigen)",
                    "importFrom(Rcpp, evalCpp)",        ## ensures Rcpp instantiation