diff options
| author | culler <culler> | 2020-07-23 20:32:50 (GMT) |
|---|---|---|
| committer | culler <culler> | 2020-07-23 20:32:50 (GMT) |
| commit | 8ed3b12de30efc4a2770627d32616cd91080a22c (patch) | |
| tree | dc1c4f4472e9923035c0f96f40fcda508bab00db /tests/listbox.test | |
| parent | ef7581bec4c78d6fb07d451dc6da67a333422d83 (diff) | |
| download | tk-8ed3b12de30efc4a2770627d32616cd91080a22c.zip tk-8ed3b12de30efc4a2770627d32616cd91080a22c.tar.gz tk-8ed3b12de30efc4a2770627d32616cd91080a22c.tar.bz2 | |
Another adjustment to listbox-21.9
Diffstat (limited to 'tests/listbox.test')
| -rw-r--r-- | tests/listbox.test | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/tests/listbox.test b/tests/listbox.test index 17b6e6b..84f2d4a 100644 --- a/tests/listbox.test +++ b/tests/listbox.test @@ -2662,11 +2662,10 @@ test listbox-21.8 {ListboxListVarProc, test selection after listvar mod} -setup test listbox-21.9 {ListboxListVarProc, test hscrollbar after listvar mod} -setup { destroy .l } -body { - catch {unset x} - set log {} - update idletasks + set x {} listbox .l -font $fixed -width 10 -xscrollcommand "record x" -listvar x pack .l + set log {} update idletasks lappend x "0000000000" update idletasks @@ -2675,7 +2674,7 @@ test listbox-21.9 {ListboxListVarProc, test hscrollbar after listvar mod} -setup set log } -cleanup { destroy .l -} -result [list {x 0 1} {x 0 1} {x 0 0.5}] +} -result [list {x 0 1} {x 0 0.5}] test listbox-21.10 {ListboxListVarProc, test hscrollbar after listvar mod} -setup { destroy .l } -body { |