[GRASS-CVS] markus: grass6/scripts/r.regression.line r.regression.line, 1.16, 1.17

[grass at intevation.de]

Author: markus

Update of /grassrepository/grass6/scripts/r.regression.line
In directory doto:/tmp/cvs-serv3711

Modified Files:
	r.regression.line 
Log Message:
check if maps are there

Index: r.regression.line
===================================================================
RCS file: /grassrepository/grass6/scripts/r.regression.line/r.regression.line,v
retrieving revision 1.16
retrieving revision 1.17
diff -u -d -r1.16 -r1.17
--- r.regression.line	2 Dec 2007 14:26:12 -0000	1.16
+++ r.regression.line	3 Dec 2007 22:52:43 -0000	1.17
@@ -67,6 +67,21 @@
 LC_NUMERIC=C
 export LC_NUMERIC
 
+ok=yes
+eval `g.findfile element=cell file=$GIS_OPT_MAP1`
+if [ -z "$name" ] ; then
+      g.message -e "Raster map <$GIS_OPT_MAP1> not found"
+      ok=no
+fi
+eval `g.findfile element=cell file=$GIS_OPT_MAP2`
+if [ -z "$name" ] ; then
+      g.message -e "Raster map <$GIS_OPT_MAP2> not found"
+      ok=no
+fi
+if [ "$ok" = "no" ] ; then
+ exit 1
+fi
+
 TMP="`g.tempfile pid=$$`"
 if [ $? -ne 0 ] || [ -z "$TMP" ] ; then
     g.message -e "Unable to create temporary files"