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

[svn_grass at osgeo.org]

Author: neteler
Date: 2011-08-11 14:16:02 -0700 (Thu, 11 Aug 2011)
New Revision: 47569

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

Modified: grass-addons/grass7/imagery/i.topo.corr/main.c
===================================================================
--- grass-addons/grass7/imagery/i.topo.corr/main.c	2011-08-11 21:13:11 UTC (rev 47568)
+++ grass-addons/grass7/imagery/i.topo.corr/main.c	2011-08-11 21:16:02 UTC (rev 47569)
@@ -174,6 +174,7 @@
 	    /* Abre fichero de bandas y el de salida */
 	    strcpy(band.name, input->answers[i]);
 	    band.fd = Rast_open_old(band.name, "");
+	    band.type = Rast_get_map_type(band.fd);
 	    if (band.type != DCELL_TYPE) {
 		G_warning(_("Reflectance of <%s> is not of DCELL type - ignored."),
 			  input->answers[i]);