Changeset 1543 for trunk/gui/scripts/field2dresult.tcl
- Timestamp:
- Jul 6, 2009 3:01:17 PM (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gui/scripts/field2dresult.tcl
r1539 r1543 54 54 -mode auto 55 55 } 56 puts stderr "Field2dResult constructor $this"57 56 array set flags $args 58 57 set servers [Rappture::VisViewer::GetServerList "nanovis"] … … 73 72 } 74 73 } 75 puts stderr "$this created $itk_component(renderer)"76 74 pack $itk_component(renderer) -expand yes -fill both 77 75 # can't connect to rendering farm? then fall back to older viewer … … 94 92 # ---------------------------------------------------------------------- 95 93 itcl::body Rappture::Field2DResult::destructor {} { 96 puts stderr "Field2dResult destructor $this"97 94 } 98 95 … … 105 102 # ---------------------------------------------------------------------- 106 103 itcl::body Rappture::Field2DResult::add {dataobj {settings ""}} { 107 puts stderr "Field2dResult $this add $dataobj"108 104 eval $itk_component(renderer) add $dataobj [list $settings] 109 105 } … … 126 122 # ---------------------------------------------------------------------- 127 123 itcl::body Rappture::Field2DResult::delete {args} { 128 puts stderr "Field2dResult $this delete $args"129 124 eval $itk_component(renderer) delete $args 130 125 }
Note: See TracChangeset
for help on using the changeset viewer.