diff options
author | fvogel <fvogelnew1@free.fr> | 2015-11-08 21:07:23 (GMT) |
---|---|---|
committer | fvogel <fvogelnew1@free.fr> | 2015-11-08 21:07:23 (GMT) |
commit | 3ab946c3a13a9f42cf14322a908810eb56a2d4f5 (patch) | |
tree | ec2b3f74834da83c8db01b2957e5fd6ca344f5e2 /tests/font.test | |
parent | 73b89417809cc91f33a1a6c9679510b21129db52 (diff) | |
parent | 039265e2a240d17e785c3d0d55fa6a108e53f44e (diff) | |
download | tk-3ab946c3a13a9f42cf14322a908810eb56a2d4f5.zip tk-3ab946c3a13a9f42cf14322a908810eb56a2d4f5.tar.gz tk-3ab946c3a13a9f42cf14322a908810eb56a2d4f5.tar.bz2 |
Fixed bug [220854fff] - Trailing tab characters in entry widgets are not displayed
Diffstat (limited to 'tests/font.test')
-rw-r--r-- | tests/font.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/font.test b/tests/font.test index abe6ebf..9e44a93 100644 --- a/tests/font.test +++ b/tests/font.test @@ -1526,11 +1526,11 @@ test font-24.10 {Tk_ComputeTextLayout: tab caused break} -body { set x {} .t.l config -text "000\t" update - lappend x [expr {[winfo reqwidth .t.l] eq [expr {$ax * 3}]}] + lappend x [expr {[winfo reqwidth .t.l] eq [expr {$ax * 8}]}] lappend x [expr {[winfo reqheight .t.l] eq $ay}] .t.l config -text "000\t00" -wrap [expr $ax * 6] update - lappend x [expr {[winfo reqwidth .t.l] eq [expr {$ax * 3}]}] + lappend x [expr {[winfo reqwidth .t.l] eq [expr {$ax * 8}]}] lappend x [expr {[winfo reqheight .t.l] eq [expr {$ay * 2}]}] return $x } -cleanup { |