Disable entry-3.24 testcase on XQuartz. See: [36e379c01b], which is n…

…ow visible in GITHUB.
tcltk · Jul 1, 2024 · 5deab2d · 5deab2d
1 parent c9b34b1
commit 5deab2d
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/tests/entry.test b/tests/entry.test
@@ -11,6 +11,8 @@ namespace import ::tcltest::*
 eval tcltest::configure $argv
 tcltest::loadTestedCommands
 
+testConstraint failsOnXQuarz [expr {$tcl_platform(os) ne "Darwin" || [tk windowingsystem] ne "x11" }]
+
 # For xscrollcommand
 set scrollInfo {}
 proc scroll args {
@@ -874,7 +876,7 @@ test entry-3.23 {EntryWidgetCmd procedure, "delete" widget command} -setup {
 } -cleanup {
     destroy .e
 } -result 0123457890
-test entry-3.24 {EntryWidgetCmd procedure, "delete" widget command} -setup {
+test entry-3.24 {EntryWidgetCmd procedure, "delete" widget command} -constraints failsOnXQuarz -setup {
     entry .e
     pack .e ; update idletasks
     update