use getRcppVersion for Rcpp version in skeleton

Author: eddelbuettel

ChangeLog

@@ -1,3 +1,7 @@
+2019-04-27  Dirk Eddelbuettel  <[email protected]>
+
+	* R/Rcpp.package.skeleton.R (Rcpp.package.skeleton): Use getRcppVersion()
+
 2019-04-26  Dirk Eddelbuettel  <[email protected]>
 
 	* DESCRIPTION (Version, Date): Roll minor version

R/Rcpp.package.skeleton.R

@@ -1,4 +1,4 @@
-# Copyright (C) 2009 - 2016  Dirk Eddelbuettel and Romain Francois
+# Copyright (C) 2009 - 2019  Dirk Eddelbuettel and Romain Francois
 #
 # This file is part of Rcpp.
 #
@@ -81,8 +81,7 @@ Rcpp.package.skeleton <- function(name = "anRpackage", list = character(),
     # Add Rcpp to the DESCRIPTION
     DESCRIPTION <- file.path(root, "DESCRIPTION")
     if (file.exists(DESCRIPTION)) {
-        imports <- c(if (isTRUE(module)) "methods",
-                     sprintf("Rcpp (>= %s)", packageDescription("Rcpp")[["Version"]]))
+        imports <- c(if (isTRUE(module)) "methods", sprintf("Rcpp (>= %s)", getRcppVersion()))
         x <- cbind(read.dcf(DESCRIPTION),
                    "Imports" = paste(imports, collapse = ", "),
                    "LinkingTo" = "Rcpp")

inst/NEWS.Rd

@@ -9,6 +9,8 @@
     \itemize{
       \item Files in \code{src/} are now consistentely lowercase (Dirk
       in \ghpr{956}).
+      \item The Rcpp 'API Version' is now accessible via
+      \code{getRcppVersion()} (Dirk in \ghpr{963}).
     }
     \item Changes in Rcpp Attributes:
     \itemize{