[Rodbcext-commits] r27 - pkg/geoclimate/R

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

Author: jaunario
Date: 2012-07-16 08:04:29 +0200 (Mon, 16 Jul 2012)
New Revision: 27

Modified:
   pkg/geoclimate/R/trmm.r
Log:
Corrected some lines in get.trmm

Modified: pkg/geoclimate/R/trmm.r
===================================================================
--- pkg/geoclimate/R/trmm.r	2012-07-16 05:25:16 UTC (rev 26)
+++ pkg/geoclimate/R/trmm.r	2012-07-16 06:04:29 UTC (rev 27)
@@ -48,7 +48,7 @@
 	}
 	if (class(rawtrmm)=="try-error") stop(rawtrmm)
 	
-	if (class(savepath)=="character" & rm.existing) writeBin(rawtrmm, paste(savepath,fname,sep="/"))
+	if (class(savepath)=="character" & file.exists(paste(savepath,fname,sep="/"))) writeBin(rawtrmm, paste(savepath,fname,sep="/"))
 	
 	baseraster <- raster(extent(-180,180,-50,50))
 	res(baseraster) <- 0.25