diff options
author | fvogel <fvogelnew1@free.fr> | 2016-01-18 18:45:27 (GMT) |
---|---|---|
committer | fvogel <fvogelnew1@free.fr> | 2016-01-18 18:45:27 (GMT) |
commit | 9129e933e20a08be274e598bd6ebb597fc687a1e (patch) | |
tree | 09fb02da4a74cde53e9f12f0a80293f9fb14f7c8 /tests | |
parent | 7aae5569839d576c58f7a32b8a894c638d829098 (diff) | |
download | tk-9129e933e20a08be274e598bd6ebb597fc687a1e.zip tk-9129e933e20a08be274e598bd6ebb597fc687a1e.tar.gz tk-9129e933e20a08be274e598bd6ebb597fc687a1e.tar.bz2 |
Removed unfinished test case committed by error in the previous commit.
Diffstat (limited to 'tests')
-rw-r--r-- | tests/listbox.test | 22 |
1 files changed, 0 insertions, 22 deletions
diff --git a/tests/listbox.test b/tests/listbox.test index 40041de..76a4349 100644 --- a/tests/listbox.test +++ b/tests/listbox.test @@ -509,28 +509,6 @@ test listbox-3.18b {ListboxWidgetCmd procedure, "bbox" option, justified, non-de destroy .top.l .top unset -nocomplain lres res } -result {1} -test listbox-3.18c {ListboxWidgetCmd procedure, "bbox" option, justified, with x scrolling} -setup { - destroy .top.l .top.hs .top - -} -body { -package req Tk -destroy .top.l .top.hs .top - toplevel .top - listbox .top.l -justify right -borderwidth 7 -highlightthickness 10 -selectborderwidth 20 - scrollbar .top.hs -command ".top.l xview" -orient horizontal - .top.l configure -xscrollcommand ".top.hs set" - set huge [concat "START -" [string repeat "Huge Item... " 20] "- END"] - .top.l insert end VeryVeryLongItem1 AnEvenMuchVeryVeryLongerItem2 $huge ShortItem3 - pack .top.l -expand 1 -fill both - pack .top.hs -expand 1 -fill x - update - -<TODO> finish write this test case - -} -cleanup { - destroy .top.l .top.hs .top - -} -result {} test listbox-3.19 {ListboxWidgetCmd procedure, "cget" option} -body { .l cget } -returnCodes error -result {wrong # args: should be ".l cget option"} |