diff options
Diffstat (limited to 'tests/constraints.tcl')
| -rw-r--r-- | tests/constraints.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/constraints.tcl b/tests/constraints.tcl index 843ee4d..bc2c09b 100644 --- a/tests/constraints.tcl +++ b/tests/constraints.tcl @@ -199,7 +199,7 @@ if {![string match {{22 3 6 15} {31 18 [34] 15}} $x]} { testConstraint fonts 0 } testConstraint textfonts [expr { - [testConstraint fonts] || $tcl_platform(platform) eq "windows" + [testConstraint fonts] || [tk windowingsystem] eq "win32" }] # constraints for the visuals available.. |