diff options
author | fvogel <fvogel@noemail.net> | 2016-01-18 18:45:27 (GMT) |
---|---|---|
committer | fvogel <fvogel@noemail.net> | 2016-01-18 18:45:27 (GMT) |
commit | b3ac7a473709b7484463c9b874e4911035bce6c2 (patch) | |
tree | 09fb02da4a74cde53e9f12f0a80293f9fb14f7c8 /tests/listbox.test | |
parent | 380b695ab89733c13951f13a5b2c375a1e6483a3 (diff) | |
download | tk-b3ac7a473709b7484463c9b874e4911035bce6c2.zip tk-b3ac7a473709b7484463c9b874e4911035bce6c2.tar.gz tk-b3ac7a473709b7484463c9b874e4911035bce6c2.tar.bz2 |
Removed unfinished test case committed by error in the previous commit.
FossilOrigin-Name: 9a244ba86e58935facd83daa7d72a75fe1bfc9d9
Diffstat (limited to 'tests/listbox.test')
-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"} |