diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-11-09 13:21:42 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-11-09 13:21:42 (GMT) |
| commit | cf57d7e6876d6ebdcef96d5f3ce5467072afae27 (patch) | |
| tree | 7cfbc45fe010bb34554f71cfc545dfe547fafc3b /tests/spinbox.test | |
| parent | 61924643ebb6fd356f0f905c837e4d2e8db72a63 (diff) | |
| download | tk-cf57d7e6876d6ebdcef96d5f3ce5467072afae27.zip tk-cf57d7e6876d6ebdcef96d5f3ce5467072afae27.tar.gz tk-cf57d7e6876d6ebdcef96d5f3ce5467072afae27.tar.bz2 | |
Mark failing test-cases. Add -disable-xft build with Tcl 8.7 on Linux
Diffstat (limited to 'tests/spinbox.test')
| -rw-r--r-- | tests/spinbox.test | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/tests/spinbox.test b/tests/spinbox.test index 89cc111..5119a40 100644 --- a/tests/spinbox.test +++ b/tests/spinbox.test @@ -13,6 +13,7 @@ tcltest::loadTestedCommands testConstraint failsOnUbuntu [expr {![info exists ::env(CI)] || ![string match Linux $::tcl_platform(os)]}] testConstraint failsOnUbuntuNoXft [expr {[testConstraint failsOnUbuntu] || (![catch {tk::pkgconfig get fontsystem} fs] && ($fs eq "xft"))}] +testConstraint failsOnXQuarz [expr {$tcl_platform(os) ne "Darwin" || [tk windowingsystem] ne "x11" }] # For xscrollcommand set scrollInfo {} @@ -1083,7 +1084,7 @@ test spinbox-3.6 {SpinboxWidgetCmd procedure, "bbox" widget command} -constraint destroy .e } -result {{19 5 7 13} {19 5 7 13}} test spinbox-3.7 {SpinboxWidgetCmd procedure, "bbox" widget command} -constraints { - fonts + fonts failsOnXQuarz } -setup { spinbox .e -font {Courier -12} -borderwidth 2 -highlightthickness 2 pack .e @@ -1096,7 +1097,7 @@ test spinbox-3.7 {SpinboxWidgetCmd procedure, "bbox" widget command} -constraint destroy .e } -result {19 5 12 13} test spinbox-3.8 {SpinboxWidgetCmd procedure, "bbox" widget command} -constraints { - fonts + fonts failsOnXQuarz } -setup { spinbox .e -font {Courier -12} -borderwidth 2 -highlightthickness 2 pack .e @@ -1119,7 +1120,7 @@ test spinbox-3.9 {SpinboxWidgetCmd procedure, "bbox" widget command} -setup { destroy .e } -result "5 5 0 $cy" test spinbox-3.10 {SpinboxWidgetCmd procedure, "bbox" widget command} -constraints { - fonts + fonts failsOnXQuarz } -setup { spinbox .e -font {Courier -12} -borderwidth 2 -highlightthickness 2 pack .e |