[Rcpp-commits] r1388 - pkg/Rcpp/R

[noreply at r-forge.r-project.org]

Author: romain
Date: 2010-06-01 10:09:53 +0200 (Tue, 01 Jun 2010)
New Revision: 1388

Modified:
   pkg/Rcpp/R/Rcpp.package.skeleton.R
Log:
typo

Modified: pkg/Rcpp/R/Rcpp.package.skeleton.R
===================================================================
--- pkg/Rcpp/R/Rcpp.package.skeleton.R	2010-06-01 08:09:05 UTC (rev 1387)
+++ pkg/Rcpp/R/Rcpp.package.skeleton.R	2010-06-01 08:09:53 UTC (rev 1388)
@@ -72,12 +72,12 @@
 		ns <- file( NAMESPACE, open = "w" )
 		if( ! grepl( "useDynLib", lines ) ){
 			lines <- c( sprintf( "useDynLib(%s)", name), lines)
-			writeLines( lines, con = nm )
+			writeLines( lines, con = ns )
 			message( " >> added useDynLib directive to NAMESPACE" )
 		}
 		
 		if(isTRUE(module)){
-			writeLines( 'importClassesFrom( Rcpp, "C++ObjectS3", "C++Object", "C++Class", "Module" )', nm )
+			writeLines( 'importClassesFrom( Rcpp, "C++ObjectS3", "C++Object", "C++Class", "Module" )', ns )
 		}
 		close( ns )
 	}