[GRASS-SVN] r58861 - grass/trunk/raster/r.li/r.li.setup

[svn_grass at osgeo.org]

Author: hamish
Date: 2014-02-03 13:19:20 -0800 (Mon, 03 Feb 2014)
New Revision: 58861

Modified:
   grass/trunk/raster/r.li/r.li.setup/r.li.setup.procedures.tcl
Log:
message cosmetics (this dir is unused in trunk, but keeping in sync anyway)

Modified: grass/trunk/raster/r.li/r.li.setup/r.li.setup.procedures.tcl
===================================================================
--- grass/trunk/raster/r.li/r.li.setup/r.li.setup.procedures.tcl	2014-02-03 21:16:00 UTC (rev 58860)
+++ grass/trunk/raster/r.li/r.li.setup/r.li.setup.procedures.tcl	2014-02-03 21:19:20 UTC (rev 58861)
@@ -158,7 +158,7 @@
 		if { $env(RASTER) != "" } then {
 			exec echo "SAMPLINGFRAME 0|0|1|1" >> $tmp.set
 			updateSF_Environment
-			tk_messageBox -message "Whole maplayer set as sampling frame" -type ok
+			tk_messageBox -message "Whole map layer set as sampling frame" -type ok
 			$button configure -state disabled
 		} else {
 			tk_messageBox -message "Please set raster name first" -type ok -icon error
@@ -232,7 +232,7 @@
 		set rl [expr double($env(SF_RL)) /double($rows) ]
 		set cl [expr double($env(SF_CL)) /double($cols) ]
 		exec echo "SAMPLEAREA $x|$y|$rl|$cl" >> $tmp.set
-		tk_messageBox -message "Whole maplayer set as sampling area" -type ok
+		tk_messageBox -message "Whole map layer set as sampling area" -type ok
 	}
 	regions {
 	setSampleRegions $widget
@@ -373,7 +373,7 @@
 				set cl [expr double($number1) /double($cols) ]
 				exec echo "SAMPLEAREA -1|-1|$rl|$cl" >> $env(TMP).set
 				exec  echo "MOVINGWINDOW" >> $env(TMP).set
-				tk_messageBox -message " Moving Windows Setted "  -type ok
+				tk_messageBox -message " Moving Windows Set "  -type ok
 				destroy $widget
 			}
 		} else {
@@ -392,7 +392,7 @@
 				set rl [expr double($env(CIR_RL)) /double($rows)]
 				set cl [expr double($env(CIR_CL)) /double($cols)]
 				exec echo "MASKEDSAMPLEAREA -1|-1|$rl|$cl|$maskname" >> $env(TMP).set
-				tk_messageBox -message " Moving Windows Setted "  -type ok
+				tk_messageBox -message " Moving Windows Set "  -type ok
 				exec  echo "MOVINGWINDOW" >> $env(TMP).set
 				destroy $widget
 				}