[GRASS-SVN] r37298 - in grass/branches/develbranch_6/lib: gtcltk init

[svn_grass at osgeo.org]

Author: hamish
Date: 2009-05-20 01:15:35 -0400 (Wed, 20 May 2009)
New Revision: 37298

Modified:
   grass/branches/develbranch_6/lib/gtcltk/gronsole.tcl
   grass/branches/develbranch_6/lib/init/grass-run.bat
Log:
fix run_xterm for DOS, simplify bourne version

Modified: grass/branches/develbranch_6/lib/gtcltk/gronsole.tcl
===================================================================
--- grass/branches/develbranch_6/lib/gtcltk/gronsole.tcl	2009-05-20 05:01:36 UTC (rev 37297)
+++ grass/branches/develbranch_6/lib/gtcltk/gronsole.tcl	2009-05-20 05:15:35 UTC (rev 37298)
@@ -539,14 +539,12 @@
 	Gronsole::annotate $path $cmd [concat xterm $tags]
 
 	if { $mingw == "1" } {
-	    exec -- cmd.exe /c start $env(GISBASE)/etc/grass-run.bat $cmd &
+	    eval [list exec -- cmd.exe /c start \
+	    	$env(GISBASE)/etc/grass-run.bat ] $cmd &
 	} else {
-	    set cmd_exe [lindex $cmd 0]
-	    set args [lrange $cmd 1 end]
-	    
 	    eval [list exec -- $env(GISBASE)/etc/grass-xterm-wrapper \
-		-name xterm-grass -e $env(GISBASE)/etc/grass-run.sh \
-		$cmd_exe ] $args &
+		-name xterm-grass -e $env(GISBASE)/etc/grass-run.sh ] \
+		$cmd &
 	}
 
 	update idletasks

Modified: grass/branches/develbranch_6/lib/init/grass-run.bat
===================================================================
--- grass/branches/develbranch_6/lib/init/grass-run.bat	2009-05-20 05:01:36 UTC (rev 37297)
+++ grass/branches/develbranch_6/lib/init/grass-run.bat	2009-05-20 05:15:35 UTC (rev 37298)
@@ -8,7 +8,7 @@
 set GRASS_UI_TERM=1
 
 rem Run command
-"%*"
+%*
 
 if not %errorlevel% == 0 goto error