diff options
| author | fvogel <fvogelnew1@free.fr> | 2017-03-06 23:09:12 (GMT) |
|---|---|---|
| committer | fvogel <fvogelnew1@free.fr> | 2017-03-06 23:09:12 (GMT) |
| commit | 7bbe7bbdc8405dd7b5a98b9399ed599fd12d3aaa (patch) | |
| tree | bbe130f0a845fa7fe7033b241089e66847a10591 /tests/textIndex.test | |
| parent | f802dd59b9fdec91f7178bfb7bcaa2ab2818739c (diff) | |
| parent | 8701bf597e98498ab4d757caa5a2bb9dd46a0554 (diff) | |
| download | tk-7bbe7bbdc8405dd7b5a98b9399ed599fd12d3aaa.zip tk-7bbe7bbdc8405dd7b5a98b9399ed599fd12d3aaa.tar.gz tk-7bbe7bbdc8405dd7b5a98b9399ed599fd12d3aaa.tar.bz2 | |
merge core-8-6-branch
Diffstat (limited to 'tests/textIndex.test')
| -rw-r--r-- | tests/textIndex.test | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/textIndex.test b/tests/textIndex.test index 83a249e..7d44516 100644 --- a/tests/textIndex.test +++ b/tests/textIndex.test @@ -13,7 +13,7 @@ namespace import -force tcltest::test catch {destroy .t} text .t -font {Courier -12} -width 20 -height 10 -pack append . .t {top expand fill} +pack .t -expand 1 -fill both update .t debug on wm geometry . {} @@ -714,7 +714,7 @@ test textIndex-18.1 {Object indices don't cache mark names} { } {3.4 3.0 1.0} frame .f -width 100 -height 20 -pack append . .f left +pack .f -side left set fixedFont {Courier -12} set fixedHeight [font metrics $fixedFont -linespace] @@ -724,7 +724,7 @@ set varFont {Times -14} set bigFont {Helvetica -24} destroy .t text .t -font $fixedFont -width 20 -height 10 -wrap char -pack append . .t {top expand fill} +pack .t -expand 1 -fill both .t tag configure big -font $bigFont .t debug on wm geometry . {} |