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

Timestamp:

Aug 27, 2013 12:38:22 PM (8 years ago)

Author:

ldelgass

Message:

Add cutplane visibility button to nanovis viewers.

File:

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

trunk/gui/scripts/vtkheightmapviewer.tcl

@@ -1660 +1660 @@
         incr h -$lineht 
     }
-    if { $h < 1} {
+    if { $h < 1 } {
         return
     }
@@ -2422 +2422 @@
     incr y $lineht
     $c coords colormap $x $y
-    set ix [image width $_image(legend)]
-    set ih [image height $_image(legend)]
     $c coords sensor [expr $x - $iw] $y $x [expr $y + $ih]
     $c raise sensor