[GRASS-SVN] r40451 - grass/branches/develbranch_6/gui/tcltk/gis.m

[svn_grass at osgeo.org]

Author: marisn
Date: 2010-01-14 09:42:27 -0500 (Thu, 14 Jan 2010)
New Revision: 40451

Modified:
   grass/branches/develbranch_6/gui/tcltk/gis.m/barscale.tcl
   grass/branches/develbranch_6/gui/tcltk/gis.m/dtext.tcl
   grass/branches/develbranch_6/gui/tcltk/gis.m/frames.tcl
   grass/branches/develbranch_6/gui/tcltk/gis.m/gridline.tcl
   grass/branches/develbranch_6/gui/tcltk/gis.m/histogram.tcl
   grass/branches/develbranch_6/gui/tcltk/gis.m/legend.tcl
   grass/branches/develbranch_6/gui/tcltk/gis.m/rastarrows.tcl
   grass/branches/develbranch_6/gui/tcltk/gis.m/rgbhis.tcl
Log:
gis.m: Another attempt to solve legend layer duplication issue #870

Modified: grass/branches/develbranch_6/gui/tcltk/gis.m/barscale.tcl
===================================================================
--- grass/branches/develbranch_6/gui/tcltk/gis.m/barscale.tcl	2010-01-14 13:14:39 UTC (rev 40450)
+++ grass/branches/develbranch_6/gui/tcltk/gis.m/barscale.tcl	2010-01-14 14:42:27 UTC (rev 40451)
@@ -10,14 +10,14 @@
 ##########################################################################
 
 namespace eval GmBarscale {
-    variable array opt # barscale current options
+    variable array opt ;# barscale current options
     variable count 1
-    variable array lfile # scale
-    variable array lfilemask # scale
+    variable array lfile ;# scale
+    variable array lfilemask ;# scale
     variable optlist
     variable first
-    variable array dup # layer
-    variable placement #LabelEntry widget for scale bar placment coordinates
+    variable array dup ;# layer
+    variable placement ;#LabelEntry widget for scale bar placment coordinates
 };
 
 

Modified: grass/branches/develbranch_6/gui/tcltk/gis.m/dtext.tcl
===================================================================
--- grass/branches/develbranch_6/gui/tcltk/gis.m/dtext.tcl	2010-01-14 13:14:39 UTC (rev 40450)
+++ grass/branches/develbranch_6/gui/tcltk/gis.m/dtext.tcl	2010-01-14 14:42:27 UTC (rev 40451)
@@ -10,7 +10,7 @@
 ##########################################################################
 
 namespace eval GmDtext {
-    variable array opt # d.text options
+    variable array opt ;# d.text options
     variable count 1
     variable array lfile 
     variable array lfilemask

Modified: grass/branches/develbranch_6/gui/tcltk/gis.m/frames.tcl
===================================================================
--- grass/branches/develbranch_6/gui/tcltk/gis.m/frames.tcl	2010-01-14 13:14:39 UTC (rev 40450)
+++ grass/branches/develbranch_6/gui/tcltk/gis.m/frames.tcl	2010-01-14 14:42:27 UTC (rev 40451)
@@ -10,14 +10,14 @@
 ##########################################################################
 
 namespace eval GmDframe {
-    variable array opt # frame current options
+    variable array opt ;# frame current options
     variable count 1
-    variable array tree # mon
-    variable array lfile # frame
-    variable array lfilemask # frame
+    variable array tree ;# mon
+    variable array lfile ;# frame
+    variable array lfilemask ;# frame
     variable optlist
     variable first
-    variable array dup # layer
+    variable array dup ;# layer
 }
 
 proc GmDframe::create { tree parent } {

Modified: grass/branches/develbranch_6/gui/tcltk/gis.m/gridline.tcl
===================================================================
--- grass/branches/develbranch_6/gui/tcltk/gis.m/gridline.tcl	2010-01-14 13:14:39 UTC (rev 40450)
+++ grass/branches/develbranch_6/gui/tcltk/gis.m/gridline.tcl	2010-01-14 14:42:27 UTC (rev 40451)
@@ -9,14 +9,14 @@
 ##########################################################################
 
 namespace eval GmGridline {
-    variable array opt # grid current options
+    variable array opt ;# grid current options
     variable count 1
-    variable array tree # mon
-    variable array lfile # raster
-    variable array lfilemask # raster
+    variable array tree ;# mon
+    variable array lfile ;# raster
+    variable array lfilemask ;# raster
     variable optlist
     variable first
-    variable array dup # vector
+    variable array dup ;# vector
 }
 
 proc GmGridline::create { tree parent } {

Modified: grass/branches/develbranch_6/gui/tcltk/gis.m/histogram.tcl
===================================================================
--- grass/branches/develbranch_6/gui/tcltk/gis.m/histogram.tcl	2010-01-14 13:14:39 UTC (rev 40450)
+++ grass/branches/develbranch_6/gui/tcltk/gis.m/histogram.tcl	2010-01-14 14:42:27 UTC (rev 40451)
@@ -9,14 +9,14 @@
 ##########################################################################
 
 namespace eval GmHist {
-    variable array opt # hist current options
+    variable array opt ;# hist current options
     variable count 1
-    variable array tree # mon
-    variable array lfile # histogram
-    variable array lfilemask # histogram
+    variable array tree ;# mon
+    variable array lfile ;# histogram
+    variable array lfilemask ;# histogram
     variable optlist
     variable first
-    variable array dup # layer
+    variable array dup ;# layer
 }
 
 proc GmHist::create { tree parent } {

Modified: grass/branches/develbranch_6/gui/tcltk/gis.m/legend.tcl
===================================================================
--- grass/branches/develbranch_6/gui/tcltk/gis.m/legend.tcl	2010-01-14 13:14:39 UTC (rev 40450)
+++ grass/branches/develbranch_6/gui/tcltk/gis.m/legend.tcl	2010-01-14 14:42:27 UTC (rev 40451)
@@ -33,7 +33,6 @@
     
 
     set node "legend:$count"
-	set dup($count) 1
 
     set frm [ frame .legendicon$count]
     set check [checkbutton $frm.check \
@@ -455,6 +454,7 @@
 	variable dup
 
     set node "legend:$count"
+    set dup($count) 1
 
     set frm [ frame .legendicon$count]
     set check [checkbutton $frm.check \

Modified: grass/branches/develbranch_6/gui/tcltk/gis.m/rastarrows.tcl
===================================================================
--- grass/branches/develbranch_6/gui/tcltk/gis.m/rastarrows.tcl	2010-01-14 13:14:39 UTC (rev 40450)
+++ grass/branches/develbranch_6/gui/tcltk/gis.m/rastarrows.tcl	2010-01-14 14:42:27 UTC (rev 40451)
@@ -10,13 +10,13 @@
 ##########################################################################
 
 namespace eval GmArrows {
-    variable array opt # arrows current options
+    variable array opt ;# arrows current options
     variable count 1
-    variable array tree # mon
-    variable array lfile # raster
-    variable array lfilemask # raster
+    variable array tree ;# mon
+    variable array lfile ;# raster
+    variable array lfilemask ;# raster
     variable optlist
-    variable array dup # vector
+    variable array dup ;# vector
 }
 
 ###############################################################################

Modified: grass/branches/develbranch_6/gui/tcltk/gis.m/rgbhis.tcl
===================================================================
--- grass/branches/develbranch_6/gui/tcltk/gis.m/rgbhis.tcl	2010-01-14 13:14:39 UTC (rev 40450)
+++ grass/branches/develbranch_6/gui/tcltk/gis.m/rgbhis.tcl	2010-01-14 14:42:27 UTC (rev 40451)
@@ -10,12 +10,12 @@
 ##########################################################################
 
 namespace eval GmRgbhis {
-    variable array opt # rgbhis current options
+    variable array opt ;# rgbhis current options
     variable count 1
-    variable array lfile # rgbhis
-    variable array lfilemask # rgbhis
+    variable array lfile ;# rgbhis
+    variable array lfilemask ;# rgbhis
     variable optlist
-    variable array dup # vector
+    variable array dup ;# vector
 }