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

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

Author: jmc
Date: 2010-09-24 01:09:21 +0200 (Fri, 24 Sep 2010)
New Revision: 2149

Modified:
   pkg/Rcpp/R/zzz.R
Log:
were comparing a string to an integer in .onLoad test

Modified: pkg/Rcpp/R/zzz.R
===================================================================
--- pkg/Rcpp/R/zzz.R	2010-09-23 23:04:10 UTC (rev 2148)
+++ pkg/Rcpp/R/zzz.R	2010-09-23 23:09:21 UTC (rev 2149)
@@ -18,9 +18,10 @@
 .onLoad <- function(libname, pkgname){
 	install_help_workaround()
 	
-	minimum_svn_rev <- as.integer( packageDescription( pkgname )[["MinimumSvnRev"]] )
-	if( R.version[["svn rev"]] < minimum_svn_rev ){
-		packageStartupMessage("R version too old for full use of reference methods" )
+	minimum_svn_rev <- packageDescription( pkgname )[["MinimumSvnRev"]]
+	if( as.integer(R.version[["svn rev"]]) < as.integer(minimum_svn_rev)){
+		packageStartupMessage(gettextf("R version (%s) too old for required (%s) for full use of reference methods",
+                                               R.version[["svn rev"]], minimum_svn_rev))
 	}
 }