Ignore:
Timestamp:
Nov 17, 2014 1:56:13 AM (7 years ago)
Author:
ldelgass
Message:

Try to keep style names more consistent.

File:
1 edited

Legend:

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

    r4715 r4735  
    18291829        0,0 $inner.view_l -anchor e -pady 2 \
    18301830        0,1 $inner.view -anchor w -pady 2
     1831    blt::table configure $inner r0 -resize none
    18311832
    18321833    set labels { qx qy qz qw xpan ypan zoom }
     
    18541855    incr row
    18551856
    1856     blt::table configure $inner c* r* -resize none
     1857    blt::table configure $inner c* -resize none
    18571858    blt::table configure $inner c2 -resize expand
    18581859    blt::table configure $inner r$row -resize expand
     
    21282129        -edgecolor              black
    21292130        -edges                  0
    2130         -isosurfaceopacity      0.6
    21312131        -isosurfacevisible      1
    21322132        -levels                 10
    21332133        -lighting               1
    21342134        -linewidth              1.0
     2135        -opacity                0.6
    21352136        -outline                0
    21362137        -wireframe              0
     
    21442145    array set style [$dataobj style $comp]
    21452146    if { $dataobj != $_first || $style(-levels) == 1 } {
    2146         set style(-isosurfaceopacity) 1.0
     2147        set style(-opacity) 1.0
    21472148    }
    21482149
     
    21572158
    21582159    if { $_changed(-isosurfaceopacity) } {
    2159         set style(-isosurfaceopacity) $_settings(-isosurfaceopacity)
     2160        set style(-opacity) $_settings(-isosurfaceopacity)
    21602161    }
    21612162    if { $_changed(-numcontours) } {
     
    22062207    SendCmd "contour3d linecolor [Color2RGB $style(-edgecolor)] $tag"
    22072208    SendCmd "contour3d linewidth $style(-linewidth) $tag"
    2208     SendCmd "contour3d opacity $style(-isosurfaceopacity) $tag"
    2209     set _settings(-isosurfaceopacity) $style(-isosurfaceopacity)
     2209    SendCmd "contour3d opacity $style(-opacity) $tag"
     2210    set _settings(-isosurfaceopacity) $style(-opacity)
    22102211    SetCurrentColormap $style(-color)
    22112212    SendCmd "contour3d wireframe $style(-wireframe) $tag"
Note: See TracChangeset for help on using the changeset viewer.