Changeset 2941

Timestamp:

Apr 4, 2012 4:05:24 PM (12 years ago)

Author:

ldelgass

Message:

Comment out another debug string

Location:

trunk/gui/scripts

Files:

• controlOwner.tcl (modified) (1 diff)
• resultviewer.tcl (modified) (1 diff)

trunk/gui/scripts/controlOwner.tcl

@@ -269 +269 @@
 
         set type [[tool] xml element -as type $path]
- puts stderr type=$type
+        #puts stderr type=$type
         if {[info exists _type2curpath($type)]} {
             set currentpath $path.$_type2curpath($type)

trunk/gui/scripts/resultviewer.tcl

@@ -297 +297 @@
                             "points-on-mesh" {
                                 set mesh [$dataobj mesh]
-                                set fmt [expr {("" != $mesh) ? "vtk" : "nanovis"}] 
-                                set extents [$dataobj extents] 
+                                set fmt [expr {("" != $mesh) ? "vtk" : "nanovis"}]
+                                set extents [$dataobj extents]
                                 if { $extents > 1 } {
-                                    set fmt "flowvis" 
+                                    set fmt "flowvis"
                                 }
                             }