From e43c3c8be1a8b46419c5b4b8308a1dff03a803fc Mon Sep 17 00:00:00 2001
From: fvogel <fvogelnew1@free.fr>
Date: Sat, 16 Jan 2016 15:43:00 +0000
Subject: Decided about test results for listbox-3.18a

---
 tests/listbox.test | 10 +++++-----
 1 file 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
-- 
cgit v0.12