Changeset 4939 for branches/1.4/gui/scripts/xyresult.tcl

Timestamp:

Jan 18, 2015, 12:44:43 PM (10 years ago)

Author:

ldelgass

Message:

merge r4918,r4921-4922 from 1.3 branch (recolor)

Location:

branches/1.4

Files:

• . (modified) (1 prop)
• gui/scripts/xyresult.tcl (modified) (2 diffs)

branches/1.4/gui/scripts/xyresult.tcl

@@ -249 +249 @@
     }
     if { $color == "auto" || $color == "autoreset" } {
-        if { $color == "autoreset" } {
-            set _nextColorIndex 0
-        }
+#        if { $color == "autoreset" } {
+#            set _nextColorIndex 0
+#        }
         set color [lindex $itk_option(-autocolors) $_nextColorIndex]
         if { "" == $color} { 
@@ -1067 +1067 @@
         }
     }
+        incr _nextColorIndex
     if {$_nextColorIndex >= [llength $itk_option(-autocolors)]} {
         set _nextColorIndex 0