Changeset 1540

Timestamp:

Jul 2, 2009, 9:51:45 AM (15 years ago)

Author:

gah

Message:

 

File:

• trunk/gui/scripts/resultviewer.tcl (modified) (5 diffs)

trunk/gui/scripts/resultviewer.tcl

@@ -66 +66 @@
 # ----------------------------------------------------------------------
 itcl::body Rappture::ResultViewer::destructor {} {
-    puts stderr "destructor called for $this"
     foreach slot $_dataslots {
         foreach obj $slot {
@@ -103 +102 @@
 # ----------------------------------------------------------------------
 itcl::body Rappture::ResultViewer::clear {{index ""}} {
-    puts stderr "ResultViewer::clear"
     if {"" != $index} {
         # clear one result
@@ -153 +151 @@
 # ----------------------------------------------------------------------
 itcl::body Rappture::ResultViewer::plot {option args} {
-    puts stderr "ResultViewer::plot $option $args"
     switch -- $option {
         add {
@@ -241 +238 @@
                 2D {
                     set mode "contour"
-                    puts stderr "mode=$mode exists=[info exists _mode2widget($mode)]"
                     if {![info exists _mode2widget($mode)]} {
                         if { [$dataobj isunirect2d] } {
@@ -258 +254 @@
                         set _mode2widget($mode) $w
                     }
-                    puts stderr "mode=$mode w=$_mode2widget($mode)"
                 }
                 3D {