[GRASS-SVN] r44975 - grass/trunk/imagery/i.eb.evapfr

[svn_grass at osgeo.org]

Author: ychemin
Date: 2011-01-11 20:14:55 -0800 (Tue, 11 Jan 2011)
New Revision: 44975

Modified:
   grass/trunk/imagery/i.eb.evapfr/main.c
Log:
bug fixing segfault if no soilmoisture flag

Modified: grass/trunk/imagery/i.eb.evapfr/main.c
===================================================================
--- grass/trunk/imagery/i.eb.evapfr/main.c	2011-01-12 03:20:36 UTC (rev 44974)
+++ grass/trunk/imagery/i.eb.evapfr/main.c	2011-01-12 04:14:55 UTC (rev 44975)
@@ -169,9 +169,9 @@
     Rast_close(infd_g0);
     Rast_close(infd_h0);
     G_free(outrast1);
-    G_free(outrast2);
+    Rast_close(outfd1);
     if (makin) {
-	Rast_close(outfd1);
+        G_free(outrast2);
 	Rast_close(outfd2);
     }
     Rast_short_history(result1, "raster", &history);