- Timestamp:
- Aug 7, 2016, 10:21:42 PM (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gui/scripts/gauge.tcl
r6295 r6476 64 64 protected method _pop_uq_deactivate {} 65 65 66 private variable _value 0 ;# value for this widget67 private variable _mode exact ;# current mode68 private variable _pde "" ;# ProbDistEditor69 private variable _val "" ;# value choice combobox66 private variable _value 0; # value for this widget 67 private variable _mode exact; # current mode 68 private variable _pde ""; # ProbDistEditor 69 private variable _val ""; # value choice combobox 70 70 private variable uq no 71 71 … … 308 308 itcl::body Rappture::Gauge::edit {option} { 309 309 if {$itk_option(-state) == "disabled"} { 310 return ;# disabled? then bail out here!310 return; # disabled? then bail out here! 311 311 } 312 312 switch -- $option { … … 446 446 itcl::body Rappture::Gauge::_hilite {comp state} { 447 447 if {$itk_option(-state) == "disabled"} { 448 set state 0 ;# disabled? then don't hilite448 set state 0; # disabled? then don't hilite 449 449 } 450 450 if {$comp == "value" && !$itk_option(-editable)} { … … 477 477 # puts "Gauge::editor option=$option args=$args" 478 478 if {$itk_option(-state) == "disabled"} { 479 return ;# disabled? then bail out here!479 return; # disabled? then bail out here! 480 480 } 481 481 switch -- $option { … … 639 639 $itk_component(uq) configure -state $itk_option(-state) 640 640 } 641 _redraw ;# fix gauge641 _redraw; # fix gauge 642 642 } 643 643
Note: See TracChangeset
for help on using the changeset viewer.