diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-03-08 15:13:27 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-03-08 15:13:27 (GMT) |
| commit | a5e4b9f2e248af1d2b1d0e70a5cee6db6088bcd3 (patch) | |
| tree | df0c9618725bbed50322de73e6a35f086b81a130 /tests/clrpick.test | |
| parent | 8bdbbf8c2422db95e3603724c6a0334047b07613 (diff) | |
| parent | 40dd462d543ded80a0befbb0e48aafbccd89ea02 (diff) | |
| download | tk-a5e4b9f2e248af1d2b1d0e70a5cee6db6088bcd3.zip tk-a5e4b9f2e248af1d2b1d0e70a5cee6db6088bcd3.tar.gz tk-a5e4b9f2e248af1d2b1d0e70a5cee6db6088bcd3.tar.bz2 | |
Mark more testcases with failsOnXQuarz
Diffstat (limited to 'tests/clrpick.test')
| -rw-r--r-- | tests/clrpick.test | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/tests/clrpick.test b/tests/clrpick.test index c15308b..747a1c4 100644 --- a/tests/clrpick.test +++ b/tests/clrpick.test @@ -10,6 +10,8 @@ eval tcltest::configure $argv tcltest::loadTestedCommands namespace import -force tcltest::test +testConstraint failsOnXQuarz [expr {$tcl_platform(os) ne "Darwin" || [tk windowingsystem] ne "x11" }] + if {[testConstraint defaultPseudocolor8]} { # let's soak up a bunch of colors...so that # machines with small color palettes still fail. @@ -172,7 +174,7 @@ test clrpick-2.2 {tk_chooseColor command} -constraints { tk_chooseColor -parent . -title "choose #808040" } -result {#808040} test clrpick-2.3 {tk_chooseColor command} -constraints { - nonUnixUserInteraction colorsLeftover + nonUnixUserInteraction colorsLeftover failsOnXQuarz } -body { ToPressButton . ok tk_chooseColor -parent . -title "Press OK" |