switch to requireNamespace() to test for Suggests: only package

this pleases R-devel CMD check

Author: eddelbuettel

ChangeLog

@@ -5,7 +5,10 @@
         * vignettes/getCurrentVersionsOfCitedPackages.R: New helper function
         * .Rbuildignore: Added vignettes/getCurrentVersionsOfCitedPackages.R
 
-2015-01-05  Wush Wu <[email protected]>
+        * R/unit.tests.R (test): Use requireNamespace() instead of require()
+        * R/unit.tests.R (test): Ditto
+
+2015-01-19  Wush Wu <[email protected]>
 
         * inst/include/Rcpp/sugar/functions/var.h: Support four vector types
         * inst/unitTests/runit.sugar.var.R: Added corresponding tests

R/Rcpp.package.skeleton.R

@@ -1,6 +1,6 @@
 # -*- tab-width: 4; -*-
 
-# Copyright (C) 2009 - 2014  Dirk Eddelbuettel and Romain Francois
+# Copyright (C) 2009 - 2015  Dirk Eddelbuettel and Romain Francois
 #
 # This file is part of Rcpp.
 #
@@ -28,7 +28,7 @@ Rcpp.package.skeleton <- function(name = "anRpackage", list = character(),
                                   email = "[email protected]",
                                   license = "GPL (>= 2)") {
 
-    havePkgKitten <- require("pkgKitten", quietly=TRUE, character.only=TRUE)
+    havePkgKitten <- requireNamespace("pkgKitten", quietly=TRUE, character.only=TRUE)
 
     call <- match.call()
     call[[1]] <- as.name("package.skeleton")

R/unit.tests.R

@@ -1,4 +1,4 @@
-# Copyright (C) 2010 - 2014  Dirk Eddelbuettel, Romain Francois and Kevin Ushey
+# Copyright (C) 2010 - 2015  Dirk Eddelbuettel, Romain Francois and Kevin Ushey
 #
 # This file is part of Rcpp.
 #
@@ -19,7 +19,7 @@ test <- function(output=if(file.exists("/tmp")) "/tmp" else getwd(),
                  gctorture=FALSE,
                  gctorture.exclude="runit.Module.client.package.R") {
 
-    if (require(RUnit)) {
+    if (requireNamespace("RUnit")) {
 
         if (gctorture) {