Changeset 3765 for branches/1.3/gui/scripts/numberresult.tcl
- Timestamp:
- Jul 10, 2013, 12:43:48 PM (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/1.3/gui/scripts/numberresult.tcl
r3454 r3765 95 95 protected method GetValue {dataobj {which both}} 96 96 protected method GetInfo {what dataobj {which both}} 97 private method ResetLegend {} 97 98 98 99 private variable _dispatcher "" ;# dispatcher for !events … … 243 244 } 244 245 pack $itk_component(legend) -expand yes -fill both 245 after idle [subst { 246 update idletasks 247 $itk_component(legend) reset 248 }] 246 after idle [itcl::code $this ResetLegend] 247 249 248 # quick-and-dirty zoom functionality, for now... 250 249 Blt_ZoomStack $itk_component(plot) … … 1564 1563 } 1565 1564 } 1565 1566 # 1567 # ResetLegend -- 1568 # 1569 itcl::body Rappture::NumberResult::ResetLegend {} { 1570 set g $itk_component(plot) 1571 update idletasks 1572 $itk_component(legend) reset [$g element show] 1573 }
Note: See TracChangeset
for help on using the changeset viewer.