Changeset 4460 for branches/1.3


Ignore:
Timestamp:
Jul 3, 2014 10:17:55 AM (6 years ago)
Author:
ldelgass
Message:

merge streamlines viewer from trunk

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/1.3/gui/scripts/vtkstreamlinesviewer.tcl

    r4455 r4460  
    11# -*- mode: tcl; indent-tabs-mode: nil -*-
    22# ----------------------------------------------------------------------
    3 #  COMPONENT: vtkviewer - Vtk drawing object viewer
     3#  COMPONENT: vtkstreamlinesviewer - Vtk streamlines object viewer
    44#
    55#  It connects to the Vtk server running on a rendering farm,
     
    77# ======================================================================
    88#  AUTHOR:  Michael McLennan, Purdue University
    9 #  Copyright (c) 2004-2012  HUBzero Foundation, LLC
     9#  Copyright (c) 2004-2014  HUBzero Foundation, LLC
    1010#
    1111#  See the file "license.terms" for information on usage and
     
    10211021            set label [$_first hints ${axis}label]
    10221022            if { $label != "" } {
    1023                 SendCmd "axis name $axis $label"
     1023                SendCmd [list axis name $axis $label]
    10241024            }
    10251025            set units [$_first hints ${axis}units]
    10261026            if { $units != "" } {
    1027                 SendCmd "axis units $axis $units"
     1027                SendCmd [list axis units $axis $units]
    10281028            }
    10291029        }
     
    14831483            }
    14841484            # Get the new limits because the field changed.
    1485             SendCmd "dataset maprange explicit $_limits($_curFldName) $_curFldName"
     1485            if { ![info exists _limits($_curFldName)] } {
     1486                SendCmd "dataset maprange all"
     1487            } else {
     1488                SendCmd "dataset maprange explicit $_limits($_curFldName) $_curFldName"
     1489            }
    14861490            SendCmd "streamlines colormode $_colorMode $_curFldName"
    14871491            SendCmd "cutplane colormode $_colorMode $_curFldName"
     
    15041508    set font "Arial 8"
    15051509    set lineht [font metrics $font -linespace]
    1506     set c $itk_component(legend)
    15071510    set w 12
    15081511    set h [expr {$_height - 3 * ($lineht + 2)}]
    1509     if { $h < 1} {
     1512    if { $h < 1 } {
    15101513        return
    15111514    }
     
    17361739        Rappture::Combobox $inner.colormap -width 10 -editable no
    17371740    }
    1738 
    17391741    $inner.colormap choices insert end [GetColormapList]
     1742
    17401743    $itk_component(colormap) value "BCGYR"
    17411744    bind $inner.colormap <<Value>> \
     
    18061809        "static_triad"    "static" \
    18071810        "closest_triad"   "closest" \
    1808         "furthest_triad"  "furthest" \
     1811        "furthest_triad"  "farthest" \
    18091812        "outer_edges"     "outer"         
    18101813    $itk_component(axismode) value "static"
     
    23442347        "move" {
    23452348            set axis [lindex $args 0]
    2346             set oldval $_settings(axis-${axis}position)
    23472349            set newval [lindex $args 1]
    23482350            if {[llength $args] != 2} {
Note: See TracChangeset for help on using the changeset viewer.