[GRASS-SVN] r47575 - grass-addons/grass7/imagery/i.topo.corr

[svn_grass at osgeo.org]

Author: neteler
Date: 2011-08-11 14:28:55 -0700 (Thu, 11 Aug 2011)
New Revision: 47575

Modified:
   grass-addons/grass7/imagery/i.topo.corr/main.c
Log:
read type of basemap

Modified: grass-addons/grass7/imagery/i.topo.corr/main.c
===================================================================
--- grass-addons/grass7/imagery/i.topo.corr/main.c	2011-08-11 21:26:30 UTC (rev 47574)
+++ grass-addons/grass7/imagery/i.topo.corr/main.c	2011-08-11 21:28:55 UTC (rev 47575)
@@ -166,6 +166,7 @@
 	    G_fatal_error(_("Invalid method: %s"), metho->answer);
 
 	dem.fd = Rast_open_old(base->answer, "");
+	dem.type= Rast_open_old(base->answer, "");
 	if (dem.type == CELL_TYPE)
 	    G_fatal_error(_("Illumination model is of CELL type"));