diff options
author | fvogel <fvogelnew1@free.fr> | 2017-01-28 17:38:11 (GMT) |
---|---|---|
committer | fvogel <fvogelnew1@free.fr> | 2017-01-28 17:38:11 (GMT) |
commit | ac3c1f125c104ab506961d6653f0de098a056686 (patch) | |
tree | dd0fde4b21546c7e12721112864ceb79dbf0241e /tests/textWind.test | |
parent | d033d601736ea26760f95cc30695c80d4d19bafe (diff) | |
download | tk-ac3c1f125c104ab506961d6653f0de098a056686.zip tk-ac3c1f125c104ab506961d6653f0de098a056686.tar.gz tk-ac3c1f125c104ab506961d6653f0de098a056686.tar.bz2 |
Make tests pass again after fixing [c0dbdd3ff3]: Tk Compatibility Fonts block access to system fontsbug_c0dbdd3ff3
Diffstat (limited to 'tests/textWind.test')
-rw-r--r-- | tests/textWind.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/textWind.test b/tests/textWind.test index b0359f9..f5a5152 100644 --- a/tests/textWind.test +++ b/tests/textWind.test @@ -16,7 +16,7 @@ tcltest::loadTestedCommands option add *Text.borderWidth 2 option add *Text.highlightThickness 2 -option add *Text.font {Courier -12} +option add *Text.font {"Courier New" -12} deleteWindows @@ -27,7 +27,7 @@ update .t debug on # 15 on XP, 13 on Solaris 8 -set fixedHeight [font metrics {Courier -12} -linespace] +set fixedHeight [font metrics {"Courier New" -12} -linespace] set fixedDiff [expr {$fixedHeight - 13}] ;# 2 on XP set color [expr {[winfo depth .t] > 1 ? "green" : "black"}] |