Changeset 2205 for trunk/gui/scripts/field3dresult.tcl

Timestamp:

Apr 13, 2011, 1:48:45 PM (13 years ago)

Author:

gah

Message:

 

File:

• trunk/gui/scripts/field3dresult.tcl (modified) (1 diff)

trunk/gui/scripts/field3dresult.tcl

@@ -56 +56 @@
     array set flags $args
 
-    set servers [Rappture::VisViewer::GetServerList "nanovis"]
+    switch -- $flags(-mode) {
+        "auto" - "nanovis" - "flowvis" {
+            set servers [Rappture::VisViewer::GetServerList "nanovis"]
+        }
+        "vtkcontour" {
+            set servers [Rappture::VisViewer::GetServerList "vtkvis"]
+        }
+        "vtk" {
+            # Old vtk contour widget
+        }
+        default {
+            puts stderr "unknown render mode \"$flags(-mode)\""
+        }
+    }           
     if {"" != $servers && $flags(-mode) != "vtk"} {
         switch -- $flags(-mode) {