[GRASS-SVN] r41522 - grass/branches/develbranch_6/lib/init

[svn_grass at osgeo.org]

Author: marisn
Date: 2010-03-22 10:27:17 -0400 (Mon, 22 Mar 2010)
New Revision: 41522

Modified:
   grass/branches/develbranch_6/lib/init/gis_set.tcl
Log:
tcltk: Don't fail if it's impossible to grab .

Modified: grass/branches/develbranch_6/lib/init/gis_set.tcl
===================================================================
--- grass/branches/develbranch_6/lib/init/gis_set.tcl	2010-03-22 14:12:19 UTC (rev 41521)
+++ grass/branches/develbranch_6/lib/init/gis_set.tcl	2010-03-22 14:27:17 UTC (rev 41522)
@@ -722,7 +722,7 @@
 		exit 2
 	}
   
-	grab .
+	catch { grab . }
 	tkwait window . 
 
 }