summaryrefslogtreecommitdiffstats
path: root/tests/entry.test
diff options
context:
space:
mode:
authorfvogel <fvogelnew1@free.fr>2015-11-08 21:00:48 (GMT)
committerfvogel <fvogelnew1@free.fr>2015-11-08 21:00:48 (GMT)
commit039265e2a240d17e785c3d0d55fa6a108e53f44e (patch)
treeeb585878ca1c7e18de409b8401dfd4f601b95862 /tests/entry.test
parent2028daf50bcb641a8be43c4989a37074d5a00f72 (diff)
parentead20630da62cb8674fea88a385281fd05a0bcd4 (diff)
downloadtk-039265e2a240d17e785c3d0d55fa6a108e53f44e.zip
tk-039265e2a240d17e785c3d0d55fa6a108e53f44e.tar.gz
tk-039265e2a240d17e785c3d0d55fa6a108e53f44e.tar.bz2
Fixed bug [220854fff] - Trailing tab characters in entry widgets are not displayed
Diffstat (limited to 'tests/entry.test')
-rw-r--r--tests/entry.test8
1 files changed, 8 insertions, 0 deletions
diff --git a/tests/entry.test b/tests/entry.test
index ffdbf45..27acfc1 100644
--- a/tests/entry.test
+++ b/tests/entry.test
@@ -778,6 +778,14 @@ test entry-6.11 {EntryComputeGeometry procedure} win {
[expr 8+5*[font measure {helvetica 12} .]] \
[expr 8+5*[font measure {helvetica 12} X]] \
[expr 8+[font measure {helvetica 12} 12345]]]
+test entry-6.12 {EntryComputeGeometry procedure} {fonts} {
+ catch {destroy .e}
+ entry .e -font $fixed -bd 2 -relief raised -width 20
+ pack .e
+ .e insert end "012\t456\t"
+ update
+ list [.e index @81] [.e index @82] [.e index @116] [.e index @117]
+} {6 7 7 8}
catch {destroy .e}
entry .e -width 10 -font $fixed -textvariable contents -xscrollcommand scroll