Changeset 3429 for trunk

Timestamp:

Mar 3, 2013 6:27:16 PM (11 years ago)

Author:

gah

Message:

fix for sequence of contours

Location:

trunk/gui/scripts

Files:

• field.tcl (modified) (2 diffs)
• vtkheightmapviewer.tcl (modified) (2 diffs)

trunk/gui/scripts/field.tcl

@@ -91 +91 @@
     public method blob {{cname -overall}}
     public method limits {axis}
-    public method limits2 {}
+    public method fieldlimits {}
     public method controls {option args}
     public method hints {{key ""}}
@@ -487 +487 @@
 
 # ----------------------------------------------------------------------
-# USAGE: limits2
+# USAGE: fieldlimits
 #
 # Returns a list {min max} representing the limits for the specified
 # axis.
 # ----------------------------------------------------------------------
-itcl::body Rappture::Field::limits2 {} {
+itcl::body Rappture::Field::fieldlimits {} {
     foreach cname [array names _comp2limits] {
         array set limits $_comp2limits($cname) 

trunk/gui/scripts/vtkheightmapviewer.tcl

@@ -598 +598 @@
 }
 
-# ----------------------------------------------------------------------
-# USAGE: scale ?<data1> <data2> ...?
-#
-# Sets the default limits for the overall plot according to the
-# limits of the data for all of the given <data> objects.  This
-# accounts for all objects--even those not showing on the screen.
-# Because of this, the limits are appropriate for all objects as
-# the user scans through data in the ResultSet viewer.
-# ----------------------------------------------------------------------
+# 
+# scale  --
+#
+#       This gets called either incrementally as new simulations are
+#       added or all at once as a sequence of heightmaps.
+#       This  accounts for all objects--even those not showing on the 
+#       screen.  Because of this, the limits are appropriate for all 
+#       objects as the user scans through data in the ResultSet viewer.
+#
 itcl::body Rappture::VtkHeightmapViewer::scale {args} {
     foreach dataobj $args {
@@ -625 +625 @@
             set _limits($axis) [list $amin $amax]
         }
-        foreach { fname lim } [$dataobj limits2] {
+        foreach { fname lim } [$dataobj fieldlimits] {
             if { ![info exists _limits($fname)] } {
                 set _limits($fname) $lim