diff options
Diffstat (limited to 'tests/tk.test')
| -rw-r--r-- | tests/tk.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/tk.test b/tests/tk.test index 0316a7b..4fdec1f 100644 --- a/tests/tk.test +++ b/tests/tk.test @@ -74,12 +74,12 @@ test tk-3.9 {tk command: scaling: too big} -body { test tk-3.10 {tk command: scaling: widthmm} -body { tk scaling 1.25 expr {int((25.4*[winfo screenwidth .])/(72*1.25) + 0.5) \ - - [winfo screenmmwidth .]} + - [winfo screenmmwidth .]} } -result 0 test tk-3.11 {tk command: scaling: heightmm} -body { tk scaling 1.25 expr {int((25.4*[winfo screenheight .])/(72*1.25) + 0.5) \ - - [winfo screenmmheight .]} + - [winfo screenmmheight .]} } -result 0 tk scaling $scaling |