diff options
| author | fvogel <fvogelnew1@free.fr> | 2023-11-13 06:40:07 (GMT) |
|---|---|---|
| committer | fvogel <fvogelnew1@free.fr> | 2023-11-13 06:40:07 (GMT) |
| commit | f0844f86778394bb001df716ca5dea9aee95abec (patch) | |
| tree | bbda6e916548db7e4d5953db42f5527acdd07689 | |
| parent | a417a924de5d80940b31da2856b812f3ab10eead (diff) | |
| download | tk-f0844f86778394bb001df716ca5dea9aee95abec.zip tk-f0844f86778394bb001df716ca5dea9aee95abec.tar.gz tk-f0844f86778394bb001df716ca5dea9aee95abec.tar.bz2 | |
Forgot abs() in previous commit.
| -rw-r--r-- | tests/font.test | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/font.test b/tests/font.test index d260dce..a708242 100644 --- a/tests/font.test +++ b/tests/font.test @@ -2349,7 +2349,7 @@ puts "font actual {times -12}: [font actual {times -12}]" puts "oldsize: $oldsize" tk scaling 0.5 puts "font actual {times -12}: [font actual {times -12}]" - expr {([font actual {times -12} -size] / $oldscale * 0.5 - $oldsize) < 0.001} + expr {abs([font actual {times -12} -size] / $oldscale * 0.5 - $oldsize) < 0.001} } -cleanup { tk scaling $oldscale } -result 1 |