sync RunInXterm related changes from devbr6

git-svn-id: https://svn.osgeo.org/grass/grass/trunk@37332 15284696-431f-4ddb-bdfa-cd5b030d7da7

lib/gtcltk/gronsole.tcl

@@ -392,6 +392,8 @@ proc Gronsole::readeof {path ci mark fh} {
 
 proc Gronsole::readout {path ci mark fh} {
 
+#	global mingw
+
 	set lines {}
 	
 	while {[gets $fh line] >= 0} {
@@ -400,6 +402,10 @@ proc Gronsole::readout {path ci mark fh} {
 	
 	if {[llength $lines] != 0} {
 		Gronsole::add_data_tag $path $ci out
+#		if { $mingw == "1" } {
+		    # FIXME bug #606
+#		    Gronsole::output_to_gronsole $path $mark $ci [list cmd$ci cmd$ci-out] "\n"
+#		}
 	}
 	foreach line $lines {
 		Gronsole::output_to_gronsole $path $mark $ci [list cmd$ci cmd$ci-out] "$line\n"
@@ -522,9 +528,12 @@ proc Gronsole::run_xterm {path cmd tags} {
 	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 {
-	    exec -- $env(GISBASE)/etc/grass-xterm-wrapper -name xterm-grass -e $env(GISBASE)/etc/grass-run.sh $cmd &
+	    eval [list exec -- $env(GISBASE)/etc/grass-xterm-wrapper \
+		-name xterm-grass -e $env(GISBASE)/etc/grass-run.sh ] \
+		$cmd &
 	}
 
 	update idletasks

lib/init/grass-run.bat

@@ -8,17 +8,21 @@ rem Force command line startup mode
 set GRASS_UI_TERM=1
 
 rem Run command
-"%*"
+%*
+
+if not %errorlevel% == 0 goto error
 
 title GRASS: %1 Done.
-if %errorlevel% == 1 goto error
+echo.
+echo %1 complete.
+pause
 
-rem Pause for 2 seconds to allow user to read any output
-ping 127.0.0.1 -n 3 -w 1000 >NUL:
 :end
 exit %errorlevel%
 
 :error
+title GRASS: %1 Done. (error %errorlevel%)
+echo.
 echo -----
 echo ERROR: %1 exited abnormally.
 echo -----