diff options
author | fvogel <fvogelnew1@free.fr> | 2016-01-16 15:43:00 (GMT) |
---|---|---|
committer | fvogel <fvogelnew1@free.fr> | 2016-01-16 15:43:00 (GMT) |
commit | e43c3c8be1a8b46419c5b4b8308a1dff03a803fc (patch) | |
tree | 7593e7a7ab77b94aa96c4a6873676fa96b0f8017 /tests | |
parent | 3a1f3672915f541004b32051952b59674f8b2401 (diff) | |
download | tk-e43c3c8be1a8b46419c5b4b8308a1dff03a803fc.zip tk-e43c3c8be1a8b46419c5b4b8308a1dff03a803fc.tar.gz tk-e43c3c8be1a8b46419c5b4b8308a1dff03a803fc.tar.bz2 |
Decided about test results for listbox-3.18a
Diffstat (limited to 'tests')
-rw-r--r-- | tests/listbox.test | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/tests/listbox.test b/tests/listbox.test index fdad4c0..b62946d 100644 --- a/tests/listbox.test +++ b/tests/listbox.test @@ -476,11 +476,11 @@ test listbox-3.18a {ListboxWidgetCmd procedure, "bbox" option, justified} -const } -cleanup { destroy .top.l .top unset -nocomplain res -} -result { - # <TODO> - # Results to be defined when I get my hands on a platform featuring tcltest::testConstraints fonts == 1 - {TBD} {TBD} {TBD} {TBD} {TBD} {TBD} -} +} -result [list \ + {5 5 34 14} {5 22 74 14} {5 39 106 14} \ + {58 5 34 14} {38 22 74 14} {22 39 106 14} \ + {111 5 34 14} {71 22 74 14} {39 39 106 14} \ +] test listbox-3.18b {ListboxWidgetCmd procedure, "bbox" option, justified, non-default borderwidth} -setup { destroy .top.l .top unset -nocomplain lres res |