More restrictive matching of c++ file extensions for compileAttributes

Author: jjallaire

ChangeLog

@@ -1,3 +1,8 @@
+2014-01-18  JJ Allaiare <jj@rstudio.org>
+
+        * R/Attributes.R: More restrictive matching of c++ file extensions
+        for compileAttributes.
+
 2014-01-17  Dirk Eddelbuettel  <edd@debian.org>
 
 	* R/RcppLdpath.R (RcppCxxFlags): Restore function to supply values

R/Attributes.R

@@ -352,7 +352,7 @@ compileAttributes <- function(pkgdir = ".", verbose = getOption("verbose")) {
         dir.create(rDir)
 
     # get a list of all source files
-    cppFiles <- list.files(srcDir, pattern=glob2rx("*.c*"))
+    cppFiles <- list.files(srcDir, pattern="\\.c(c|pp)$")
 
     # derive base names (will be used for modules)
     cppFileBasenames <- tools::file_path_sans_ext(cppFiles)