Ignore:
Timestamp:
Aug 27, 2013 12:38:22 PM (8 years ago)
Author:
ldelgass
Message:

Add cutplane visibility button to nanovis viewers.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/gui/scripts/vtkglyphviewer.tcl

    r3897 r3899  
    14861486    set font "Arial 8"
    14871487    set lineht [font metrics $font -linespace]
    1488     set c $itk_component(view)
    14891488    set w 12
    14901489    set h [expr {$_height - 2 * ($lineht + 2)}]
    1491     if { $h < 1} {
     1490    if { $h < 1 } {
    14921491        return
    14931492    }
     
    22262225        "move" {
    22272226            set axis [lindex $args 0]
    2228             set a [string toupper $axis]
    2229             set oldval $_settings(cutplane${a}Position)
    22302227            set newval [lindex $args 1]
    22312228            if {[llength $args] != 2} {
Note: See TracChangeset for help on using the changeset viewer.