diff options
| author | dgp <dgp@noemail.net> | 2006-03-14 05:01:47 (GMT) |
|---|---|---|
| committer | dgp <dgp@noemail.net> | 2006-03-14 05:01:47 (GMT) |
| commit | 27f755e7667fc299c687fd59cb9271c0241d983e (patch) | |
| tree | 3f002fde32d98cd5d25c4c1cd254b2ae5ac232ae /tests/constraints.tcl | |
| parent | a7c6273a02da6ccdc29ac95483a4b9841c011970 (diff) | |
| download | tk-27f755e7667fc299c687fd59cb9271c0241d983e.zip tk-27f755e7667fc299c687fd59cb9271c0241d983e.tar.gz tk-27f755e7667fc299c687fd59cb9271c0241d983e.tar.bz2 | |
* tests/constraints.tcl: Added notAqua constraint to canvPs-3.1
* tests/canvPs.test: to stop test suite crash on Mac OSX.
[Bug 1088807]
FossilOrigin-Name: b53fbc0e47f23159e7eca2f4154dd54675e10d42
Diffstat (limited to 'tests/constraints.tcl')
| -rw-r--r-- | tests/constraints.tcl | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/tests/constraints.tcl b/tests/constraints.tcl index db1aa88..19013ec 100644 --- a/tests/constraints.tcl +++ b/tests/constraints.tcl @@ -145,6 +145,7 @@ namespace import -force tk::test::* namespace import -force tcltest::testConstraint +testConstraint userInteraction [expr {[tk windowingsystem] ne "aqua"}] testConstraint userInteraction 0 testConstraint nonUnixUserInteraction [expr { [testConstraint userInteraction] || [testConstraint unix] |