Changeset 3656 for trunk/gui/scripts/vtkheightmapviewer.tcl

Timestamp:

May 15, 2013 2:02:59 PM (11 years ago)

Author:

gah

Message:

fix assorted automatic tickets: bad data in curve, more trim space, move image creation before errors in constructor

File:

• trunk/gui/scripts/vtkheightmapviewer.tcl (modified) (6 diffs)

trunk/gui/scripts/vtkheightmapviewer.tcl

@@ -80 +80 @@
     protected method Rotate {option x y}
     protected method Zoom {option}
-    
+
     # The following methods are only used by this class.
     private method BuildAxisTab {}
@@ -193 +193 @@
     $_parser alias legend [itcl::code $this ReceiveLegend]
 
+    # Create image for legend colorbar.
+    set _image(legend) [image create photo]
+
     # Initialize the view to some default parameters.
     array set _view {
@@ -209 +212 @@
 
     array set _settings {
-        axisFlymode             "static"
-        axisMinorTicks          1
-        stretchToFit            0
+        axisFlymode             "static"
+        axisMinorTicks          1
+        stretchToFit            0
         axisLabels              1
         axisVisible             1
@@ -250 +253 @@
     itk_component add fieldmenu {
         menu $itk_component(plotarea).menu \
-            -relief flat \
+            -relief flat \
             -tearoff no 
     } {
@@ -332 +335 @@
         puts stderr "errs=$errs errorInfo=$errorInfo"
     }
-    set _image(legend) [image create photo]
 
     # Hack around the Tk panewindow.  The problem is that the requested 
@@ -1502 +1504 @@
                 $itk_component(outline) configure -state normal
                 SendCmd "camera mode image"
-            }
+            }
             if {$_settings(stretchToFit)} {
                 if {$scale == 0} {