diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-09-23 10:33:56 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-09-23 10:33:56 (GMT) |
| commit | 88a38acd049b4cef382444545c2e48764f4a43e3 (patch) | |
| tree | c034856c595242f23cb91f8aeb0156e618c2111f /tests/pack.test | |
| parent | ae1b79d466c7d533c3bb7722d7e19860461055fa (diff) | |
| download | tk-88a38acd049b4cef382444545c2e48764f4a43e3.zip tk-88a38acd049b4cef382444545c2e48764f4a43e3.tar.gz tk-88a38acd049b4cef382444545c2e48764f4a43e3.tar.bz2 | |
Mark many testcases with "failsOnUbuntu" (Not all, I still want to see the remainings failing)
Diffstat (limited to 'tests/pack.test')
| -rw-r--r-- | tests/pack.test | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/tests/pack.test b/tests/pack.test index 83525a1..a71fe7b 100644 --- a/tests/pack.test +++ b/tests/pack.test @@ -10,6 +10,8 @@ package require tcltest 2.2 eval tcltest::configure $argv tcltest::loadTestedCommands +testConstraint failsOnUbuntu [expr {![info exists ::env(TRAVIS_OS_NAME)] || ![string match linux $::env(TRAVIS_OS_NAME)]}] + # Utility procedures: proc pack1 {args} { @@ -1011,7 +1013,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} { +test pack-18.1 {unmap slaves when master unmapped} {tempNotPc failsOnUbuntu} { # adjust the position of .pack before test to avoid a screen switch # that occurs with window managers that have desktops four times as big @@ -1039,7 +1041,7 @@ test pack-18.1 {unmap slaves when master unmapped} {tempNotPc} { update lappend result [winfo ismapped .pack.a] } {1 0 200 75 0 1} -test pack-18.2 {unmap slaves when master unmapped} { +test pack-18.2 {unmap slaves when master unmapped} failsOnUbuntu { # adjust the position of .pack before test to avoid a screen switch # that occurs with window managers that have desktops four times as big |