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 | eed41e54aa350fab52153895c9052ed38517e9fa (patch) | |
tree | 09fb02da4a74cde53e9f12f0a80293f9fb14f7c8 | |
parent | 65f1c08a6b543a6c25ad704beb200541fc7f6a94 (diff) | |
download | tk-eed41e54aa350fab52153895c9052ed38517e9fa.zip tk-eed41e54aa350fab52153895c9052ed38517e9fa.tar.gz tk-eed41e54aa350fab52153895c9052ed38517e9fa.tar.bz2 |
Removed unfinished test case committed by error in the previous commit.tip_441
-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"} |