Changeset 5192 for branches/uq/gui/scripts/tempgauge.tcl
- Timestamp:
- Apr 5, 2015, 10:48:26 PM (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/uq/gui/scripts/tempgauge.tcl
r5029 r5192 73 73 74 74 if {"" != $itk_option(-spectrum)} { 75 puts "TemperatureGauge"76 75 set color [$itk_option(-spectrum) get [value]] 77 puts "TemperatureGauge: color=$color"78 76 set frac [$itk_option(-spectrum) get -fraction [value]] 79 77 } else {
Note: See TracChangeset
for help on using the changeset viewer.