diff options
| author | fvogel <fvogelnew1@free.fr> | 2022-10-31 15:19:40 (GMT) |
|---|---|---|
| committer | fvogel <fvogelnew1@free.fr> | 2022-10-31 15:19:40 (GMT) |
| commit | 2b397d1eee3e00b6521f19849d637f8deb18b6ee (patch) | |
| tree | d29bfd2ae2b44a8729403ed585ce888275e1d2ef /tests/font.test | |
| parent | 3253c12b622bd41ee5e11e383de8404f4954e4dc (diff) | |
| download | tk-2b397d1eee3e00b6521f19849d637f8deb18b6ee.zip tk-2b397d1eee3e00b6521f19849d637f8deb18b6ee.tar.gz tk-2b397d1eee3e00b6521f19849d637f8deb18b6ee.tar.bz2 | |
font-38.11, font-44.2, unixFont-2.11: Eradicate all remaining failsOnUbuntuNoXft constraints, replacing them by more specific constraints.
Diffstat (limited to 'tests/font.test')
| -rw-r--r-- | tests/font.test | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/tests/font.test b/tests/font.test index b3e286a..ca712be 100644 --- a/tests/font.test +++ b/tests/font.test @@ -15,7 +15,6 @@ tcltest::loadTestedCommands testConstraint fullutf [expr {[format %c 0x010000] != "\uFFFD"}] testConstraint failsOnUbuntu [expr {![info exists ::env(CI)] || ![string match Linux $::tcl_platform(os)]}] -testConstraint failsOnUbuntuNoXft [expr {[testConstraint failsOnUbuntu] || (![catch {tk::pkgconfig get fontsystem} fs] && ($fs eq "xft"))}] set defaultfontlist [font names] @@ -2258,7 +2257,7 @@ test font-38.10 {ParseFontNameObj procedure: arguments} -body { font actual {times xyz xyz} } -returnCodes error -result {expected integer but got "xyz"} test font-38.11 {ParseFontNameObj procedure: stylelist loop} -constraints { - unixOrWin failsOnUbuntuNoXft + unixOrWin haveTimes12BoldItalicUnderlineOverstrikeFont } -body { lrange [font actual {times 12 bold italic overstrike underline}] 4 end } -result {-weight bold -slant italic -underline 1 -overstrike 1} @@ -2348,7 +2347,7 @@ test font-44.1 {TkFontGetPixels: size < 0} -constraints failsOnUbuntu -setup { } -cleanup { tk scaling $oldscale } -result {24} -test font-44.2 {TkFontGetPoints: size >= 0} -constraints {noExceed failsOnUbuntuNoXft} -setup { +test font-44.2 {TkFontGetPoints: size >= 0} -constraints {noExceed haveTimes12Font} -setup { set oldscale [tk scaling] } -body { tk scaling 0.5 |