Changeset 3649
- Timestamp:
- May 14, 2013 3:18:07 PM (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/1.2/gui/scripts/textentry.tcl
r3646 r3649 133 133 return 134 134 } 135 set newval [ lindex $args 0]135 set newval [string trim [lindex $args 0]] 136 136 _setValue $newval 137 137 _newValue … … 556 556 } 557 557 558 set opt [ lindex $args 0]558 set opt [string trim [lindex $args 0]] 559 559 switch -- $opt { 560 560 -start {
Note: See TracChangeset
for help on using the changeset viewer.