[GRASS-SVN] r33547 - grass-addons/raster/r.sun_horizon/r.horizon

[svn_grass at osgeo.org]

Author: neteler
Date: 2008-09-25 16:45:46 -0400 (Thu, 25 Sep 2008)
New Revision: 33547

Modified:
   grass-addons/raster/r.sun_horizon/r.horizon/main.c
Log:
msg standardization; debug output since single point mode segfaults

Modified: grass-addons/raster/r.sun_horizon/r.horizon/main.c
===================================================================
--- grass-addons/raster/r.sun_horizon/r.horizon/main.c	2008-09-25 20:28:00 UTC (rev 33546)
+++ grass-addons/raster/r.sun_horizon/r.horizon/main.c	2008-09-25 20:45:46 UTC (rev 33547)
@@ -552,7 +552,7 @@
     /*read Z raster */
 
     if ((mapset = G_find_cell(elevin, "")) == NULL)
-	G_fatal_error(_("Elevation raster file not found"));
+	G_fatal_error(_("Raster map <%s> not found"), elevin);
 
     fd1 = G_open_cell_old(elevin, mapset);
 
@@ -1098,6 +1098,7 @@
 	    coslatsq = coslat * coslat;
 	}
 
+	G_debug(3, "yindex: %d, xindex %d", yindex, xindex);
 	z_orig = zp = z[yindex][xindex];
 
 	calculate_shadow();