diff options
| author | fvogel <fvogelnew1@free.fr> | 2022-12-04 14:32:08 (GMT) |
|---|---|---|
| committer | fvogel <fvogelnew1@free.fr> | 2022-12-04 14:32:08 (GMT) |
| commit | 8ebd5984ac2b766a6e4df0cb7efa262959ae7349 (patch) | |
| tree | eeba561002a9c63f2b19c8d10ac7739687a41204 /tests/textTag.test | |
| parent | fb6fb36eced4a4f01cf372bfbf537d0d39a19cba (diff) | |
| download | tk-8ebd5984ac2b766a6e4df0cb7efa262959ae7349.zip tk-8ebd5984ac2b766a6e4df0cb7efa262959ae7349.tar.gz tk-8ebd5984ac2b766a6e4df0cb7efa262959ae7349.tar.bz2 | |
Factorize definition of constraint haveBigFontTwiceLargerThanTextFont.
Diffstat (limited to 'tests/textTag.test')
| -rw-r--r-- | tests/textTag.test | 13 |
1 files changed, 2 insertions, 11 deletions
diff --git a/tests/textTag.test b/tests/textTag.test index 186cf21..230bf18 100644 --- a/tests/textTag.test +++ b/tests/textTag.test @@ -11,17 +11,8 @@ namespace import ::tcltest::* eval tcltest::configure $argv tcltest::loadTestedCommands -set fixedFont {Courier 12} -set bigFont {Helvetica 24} - -# Although unexpected, this constraint happens to evaluate to false on at -# least one system: the Github CI runner on Linux with --disable-xft -# This is because this configuration only has ONE single font available, -# making all requested fonts become actually the same font. -# See constraints.tcl for more details. -testConstraint haveBigFontTwiceLargerThanTextFont [expr { - [font actual $fixedFont -size] * 2 <= [font actual $bigFont -size] -}] +set fixedFont {Courier 12} +set bigFont {Helvetica 24} # Warn the user if the actual font is too different from what was requested. if {[font metrics [font actual $fixedFont] -fixed] != 1} { |