Changeset 2969 for branches/blt4
- Timestamp:
- Apr 13, 2012, 3:50:57 PM (12 years ago)
- Location:
- branches/blt4/gui/scripts
- Files:
-
- 3 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/blt4/gui/scripts/datatable.tcl
r2745 r2969 144 144 package require blt_datatable_csv 145 145 $d0 import csv -data $csvdata 146 for { set row 1 } { $row <=[$d0 numrows] } { incr row } {146 for { set row 0 } { $row < [$d0 numrows] } { incr row } { 147 147 set child [$_tree insert 0] 148 148 set c 0 -
branches/blt4/gui/scripts/resultviewer.tcl
r2966 r2969 572 572 # ---------------------------------------------------------------------- 573 573 itcl::body Rappture::ResultViewer::_cleanIndex {index} { 574 set index [lindex $index 0] 574 575 if {[regexp {^#([0-9]+)} $index match num]} { 575 576 return [expr {$num-1}] ;# start from 0 instead of 1 -
branches/blt4/gui/scripts/xyresult.tcl
r2966 r2969 1041 1041 # - take down tooltip 1042 1042 # 1043 if { [$g element exists $_hilite(elem)] } {1043 if { [$g element exists _hilite(elem)] } { 1044 1044 $g element deactivate $_hilite(elem) 1045 1045 }
Note: See TracChangeset
for help on using the changeset viewer.