Changeset 3069 for trunk/gui/apps/vtkviewer-test

Timestamp:

Jun 28, 2012, 12:24:23 PM (12 years ago)

Author:

ldelgass

Message:

Fix vtkviewer-test for spheres->glyphs rename in drawing object

File:

• trunk/gui/apps/vtkviewer-test (modified) (4 diffs)

trunk/gui/apps/vtkviewer-test

@@ -102 +102 @@
         return $_type
     }
+    public method shape {args} {
+        return "sphere"
+    }
 
     private variable _data ""
@@ -150 +153 @@
 
 # ----------------------------------------------------------------------
-# USAGE: send_spheres_file
+# USAGE: send_glyphs_file
 #
 # Prompts the user for a text file, and then sends the text within
 # that file along to the rendering widget.
 # ----------------------------------------------------------------------
-proc send_spheres_file {} {
-    global widgets
-
-    set file [tk_getOpenFile -title "Open VTK File as Spheres"]
+proc send_glyphs_file {} {
+    global widgets
+
+    set file [tk_getOpenFile -title "Open VTK File as Glyphs"]
     if {"" != $file && [catch {
             set fid [open $file r]
@@ -165 +168 @@
             close $fid
           }] == 0} {
-        set obj [visData #auto $info "spheres"]
+        set obj [visData #auto $info "glyphs"]
         $widgets(vtkviewer) add $obj
     }
@@ -367 +370 @@
 .mbar.file add command -label "Send VTK File..." -underline 0 -command send_file
 .mbar.file add command -label "Send VTK File as Streamlines..." -underline 0 -command send_streamlines_file
-.mbar.file add command -label "Send VTK File as Spheres..." -underline 0 -command send_spheres_file
+.mbar.file add command -label "Send VTK File as Glyphs..." -underline 0 -command send_glyphs_file
 .mbar.file add command -label "Load script..." -underline 0 -command load_script
 .mbar.file add command -label "Reset" -underline 0 -command reset