diff options
Diffstat (limited to 'tests/border.test')
| -rw-r--r-- | tests/border.test | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/tests/border.test b/tests/border.test index 5b2155d..7899cd9 100644 --- a/tests/border.test +++ b/tests/border.test @@ -14,6 +14,8 @@ if {[testConstraint pseudocolor8]} { wm geom .t +0+0 } +testConstraint failsOnUbuntu [expr {![info exists ::env(TRAVIS_OS_NAME)] || ![string match linux $::env(TRAVIS_OS_NAME)]}] + test border-1.1 {Tk_AllocBorderFromObj - converting internal reps} testborder { set x orange lindex $x 0 @@ -102,7 +104,7 @@ test border-3.4 {Tk_Free3DBorder - unlinking from list} {pseudocolor8 testborder lappend result [testborder purple] } {{{4 1} {3 0} {2 0} {1 0}} {{4 1} {2 0} {1 0}} {{4 1} {2 0}} {{2 0}} {}} -test border-4.1 {FreeBorderObjProc} testborder { +test border-4.1 {FreeBorderObjProc} {testborder failsOnUbuntu} { destroy .b set x [format purple] button .b -bg $x -text .b1 |