Changeset 4413 for branches/1.3/gui/apps/vtkisosurface-test

Timestamp:

Jun 23, 2014, 12:46:31 AM (10 years ago)

Author:

ldelgass

Message:

Merge test app fixes from trunk

Location:

branches/1.3

Files:

• . (modified) (1 prop)
• gui/apps/vtkisosurface-test (modified) (2 diffs)

branches/1.3/gui/apps/vtkisosurface-test

@@ -19 +19 @@
 #\
 bindir=`dirname $0` ; \
+. $bindir/rappture.env ; \
 exec $bindir/wish "$0" "$@"
 # ----------------------------------------------------------------------
 # wish executes everything from here on...
-
-set installdir [file root $argv0]
-set libdir [file join $installdir "lib"]
-
-lappend auto_path $libdir $libdir/vtk $libdir/vtk/tcl
-
 package require Itcl
 package require Rappture
@@ -247 +242 @@
 
 # ----------------------------------------------------------------------
-# USAGE: activate_flow
-#
-# ----------------------------------------------------------------------
-proc activate_flow {} {
-    global widgets
-    # global img_storage_dir
-    # "flow capture 117 $img_storage_dir"
-
-    set info {flow vectorid 0
-              flow particle visible on
-              flow lic on
-              flow capture 100}
-
-    $widgets(command) insert 0 $info
-    send_command
-
-}
-
-# ----------------------------------------------------------------------
 # TOPLEVEL FOR IMAGES
 # ----------------------------------------------------------------------