Changeset 4533 for branches/1.3/gui/scripts

Timestamp:

Jul 17, 2014, 11:48:21 AM (10 years ago)

Author:

gah

Message:

update regression tester

Location:

branches/1.3/gui/scripts

Files:

• vtkheightmapviewer.tcl (modified) (3 diffs)
• vtkisosurfaceviewer.tcl (modified) (2 diffs)

branches/1.3/gui/scripts/vtkheightmapviewer.tcl

@@ -1421 +1421 @@
             set bool $_settings($what)
             set numColors [expr $_settings(-numisolines) + 1]
-            # FIXME: don't use StartBufferingCommands
             StartBufferingCommands
             if {$bool} {
@@ -1920 +1919 @@
         Rappture::Combobox $inner.colormap -width 10 -editable no
     }
-
     $inner.colormap choices insert end [GetColormapList -includeNone]
     $itk_component(colormap) value $_settings(-colormap)
@@ -2294 +2292 @@
         AdjustSetting -stretchtofit
     }
-
     if { $_currentNumIsolines != $style(-levels) } {
         set _currentNumIsolines $style(-levels)

branches/1.3/gui/scripts/vtkisosurfaceviewer.tcl

@@ -1359 +1359 @@
             SendCmd "axis labels all $bool"
         }
-        "-xgrid" - "-ygrid" - "-zgrid" {
-            set axis [string tolower [string range $what 1 1]]
-            set bool $_settings($what)
-            SendCmd "axis grid $axis $bool"
-        }
         "-axismode" {
             set mode [$itk_component(axisMode) value]
@@ -1552 +1547 @@
             SendCmd "cutplane slice ${axis} ${pos}"
             set _cutplanePending 0
+        }
+        "-xgrid" - "-ygrid" - "-zgrid" {
+            set axis [string tolower [string range $what 1 1]]
+            set bool $_settings($what)
+            SendCmd "axis grid $axis $bool"
         }
         default {