Changeset 56 for trunk/gui/scripts/booleanentry.tcl
- Timestamp:
- Sep 11, 2005, 10:49:16 PM (19 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gui/scripts/booleanentry.tcl
r22 r56 135 135 itcl::body Rappture::BooleanEntry::tooltip {} { 136 136 set str [$_owner xml get $_path.about.description] 137 138 set units [$_owner xml get $_path.units] 139 set min [$_owner xml get $_path.min] 140 set max [$_owner xml get $_path.max] 141 142 if {$units != "" || $min != "" || $max != ""} { 143 append str "\n\nEnter a number" 144 145 if {$min != "" && $max != ""} { 146 append str " between $min and $max" 147 } elseif {$min != ""} { 148 append str " greater than $min" 149 } elseif {$max != ""} { 150 append str " less than $max" 151 } 152 153 if {$units != ""} { 154 set desc [Rappture::Units::description $units] 155 append str " with units of $desc" 156 } 157 } 137 append str "\n\nEnter a boolean value (1/0, on/off, yes/no, true/false)" 158 138 return [string trim $str] 159 139 }
Note: See TracChangeset
for help on using the changeset viewer.