diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-01-22 11:08:01 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-01-22 11:08:01 (GMT) |
| commit | f31f7c15c932ef82b7ea1ce4df7b3a1436118d62 (patch) | |
| tree | 4769a78148772f932274d91d7596414d2fa5e33c /tests/pack.test | |
| parent | 617afea2de833e496113d4698a66a470fe2d0b43 (diff) | |
| download | tk-f31f7c15c932ef82b7ea1ce4df7b3a1436118d62.zip tk-f31f7c15c932ef82b7ea1ce4df7b3a1436118d62.tar.gz tk-f31f7c15c932ef82b7ea1ce4df7b3a1436118d62.tar.bz2 | |
Mark testcases which fail on XQuarz
Diffstat (limited to 'tests/pack.test')
| -rw-r--r-- | tests/pack.test | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/tests/pack.test b/tests/pack.test index b75d5b2..5f9061e 100644 --- a/tests/pack.test +++ b/tests/pack.test @@ -11,6 +11,7 @@ eval tcltest::configure $argv tcltest::loadTestedCommands testConstraint failsOnUbuntu [expr {![info exists ::env(CI)] || ![string match Linux $::tcl_platform(os)]}] +testConstraint failsOnQuarz [expr {![info exists ::env(MAC_CI)]}] # Utility procedures: @@ -1013,7 +1014,7 @@ test pack-17.1 {PackLostSlaveProc procedure} { [catch {pack info .pack.a} msg] $msg } {place 20x40+40+10 1 {window ".pack.a" isn't packed}} -test pack-18.1 {unmap slaves when master unmapped} {tempNotPc failsOnUbuntu} { +test pack-18.1 {unmap slaves when master unmapped} {tempNotPc failsOnUbuntu failsOnQuarz} { # adjust the position of .pack before test to avoid a screen switch # that occurs with window managers that have desktops four times as big @@ -1041,7 +1042,7 @@ test pack-18.1 {unmap slaves when master unmapped} {tempNotPc failsOnUbuntu} { update lappend result [winfo ismapped .pack.a] } {1 0 200 75 0 1} -test pack-18.2 {unmap slaves when master unmapped} failsOnUbuntu { +test pack-18.2 {unmap slaves when master unmapped} {failsOnUbuntu failsOnQuarz} { # adjust the position of .pack before test to avoid a screen switch # that occurs with window managers that have desktops four times as big |