summaryrefslogtreecommitdiffstats
path: root/tests/font.test
diff options
context:
space:
mode:
Diffstat (limited to 'tests/font.test')
-rw-r--r--tests/font.test7
1 files changed, 4 insertions, 3 deletions
diff --git a/tests/font.test b/tests/font.test
index 69d3b15..d57b998 100644
--- a/tests/font.test
+++ b/tests/font.test
@@ -2339,14 +2339,15 @@ test font-43.1 {FieldSpecified procedure: specified vs. non-specified} -body {
} -result [font actual {times 0} -family]
-test font-44.1 {TkFontGetPixels: size < 0} -constraints failsOnUbuntu -setup {
+test font-44.1 {TkFontGetPixels: size < 0} -setup {
set oldscale [tk scaling]
} -body {
+ set oldsize [expr {-(-12.0 / $oldscale)}]
tk scaling 0.5
- font actual {times -12} -size
+ expr {round([font actual {times -12} -size] / $oldscale * 0.5) - round($oldsize) == 0}
} -cleanup {
tk scaling $oldscale
-} -result 24
+} -result 1
test font-44.2 {TkFontGetPoints: size >= 0} -constraints {noExceed haveTimes12Font} -setup {
set oldscale [tk scaling]
} -body {