[GRASS-SVN] r29483 - grass-addons/gipe/i.eb.wetdrypix

[svn_grass at osgeo.org]

Author: ychemin
Date: 2007-12-20 09:47:12 -0500 (Thu, 20 Dec 2007)
New Revision: 29483

Modified:
   grass-addons/gipe/i.eb.wetdrypix/main.c
Log:
Bug fixing

Modified: grass-addons/gipe/i.eb.wetdrypix/main.c
===================================================================
--- grass-addons/gipe/i.eb.wetdrypix/main.c	2007-12-20 14:15:39 UTC (rev 29482)
+++ grass-addons/gipe/i.eb.wetdrypix/main.c	2007-12-20 14:47:12 UTC (rev 29483)
@@ -201,7 +201,7 @@
 
 	if ( (outfd = G_open_raster_new (wet,DCELL_TYPE)) < 0)
 		G_fatal_error (_("Could not open <%s>"),wet);
-	if ( (outfd = G_open_raster_new (dry,DCELL_TYPE)) < 0)
+	if ( (outfd1 = G_open_raster_new (dry,DCELL_TYPE)) < 0)
 		G_fatal_error (_("Could not open <%s>"),dry);
 
 	for (row = 0; row < nrows; row++)
@@ -277,7 +277,7 @@
 		
 		if (G_put_d_raster_row (outfd, outrast) < 0)
 			G_fatal_error (_("Cannot write to <%s>"),wet);
-		if (G_put_d_raster_row (outfd, outrast1) < 0)
+		if (G_put_d_raster_row (outfd1, outrast1) < 0)
 			G_fatal_error (_("Cannot write to <%s>"),dry);
 	}	
 	G_free(inrast_T);