improved (older) modules test files

Author: eddelbuettel

inst/unitTests/testRcppModule/NAMESPACE

@@ -1,4 +1,4 @@
 useDynLib(testRcppModule)
 exportPattern("^[[:alpha:]]+")
-import(Rcpp)
+import(Rcpp,methods)
 

inst/unitTests/testRcppModule/R/rcpp_hello_world.R

@@ -1,5 +1,5 @@
 
 rcpp_hello_world <- function(){
-	.Call( "rcpp_hello_world", PACKAGE = "testRcppModule" )
+    .Call( "rcpp_hello_world", PACKAGE = "testRcppModule" )
 }
 

inst/unitTests/testRcppModule/R/zzz.R

@@ -1,12 +1,11 @@
-NAMESPACE <- environment()
-
-.onLoad <- function(libname, pkgname){
-    loadRcppModules()
-}
+#
+#.onLoad <- function(libname, pkgname){
+#    loadRcppModules()
+#}
 
 ## For R 2.15.1 and later this also works. Note that calling loadModule() triggers
 ## a load action, so this does not have to be placed in .onLoad() or evalqOnLoad().
-#loadModule("NumEx", TRUE)
-#loadModule("yada", TRUE)
-#loadModule("stdVector", TRUE)
+loadModule("NumEx", TRUE)
+loadModule("yada", TRUE)
+loadModule("stdVector", TRUE)